From bcde251cb03d973914d87abe633351285594b068 Mon Sep 17 00:00:00 2001 From: "John S. Urban" Date: Fri, 18 Jun 2021 02:03:17 -0400 Subject: line 144? --- src/fpm_environment.f90 | 2 -- 1 file changed, 2 deletions(-) (limited to 'src/fpm_environment.f90') diff --git a/src/fpm_environment.f90 b/src/fpm_environment.f90 index 616af13..a3c073f 100644 --- a/src/fpm_environment.f90 +++ b/src/fpm_environment.f90 @@ -215,8 +215,6 @@ contains write(stderr,'(*(g0,1x))')'*get_command_arguments_stack* error obtaining argument ',i exit elseif(ilength.gt.0)then - !TODO! should escape or double quotes depending on system - !TODO! on some systems might have to do more to requote if(index(arg//' ','-').ne.1)then args=args//quote//arg//quote//' ' elseif(index(arg,' ').ne.0)then -- cgit v1.2.3