Merge pull request #51 from jacobwilliams/50-quotes

always enclose filename in quotes in execute function if it isn't already

Author: jacobwilliams

src/pyplot_module.F90

@@ -1397,6 +1397,12 @@ subroutine execute(me, pyfile, istat, python)
             file = trim(pyfile)    !use the user-specified name
         end if
 
+        if (file == '') then
+            if (present(istat)) istat = -1
+            write(error_unit,'(A)') 'Error: filename is blank.'
+            return
+        end if
+
         !open the file:
         open(newunit=iunit, file=file, status='REPLACE', iostat=iostat)
         if (iostat/=0) then
@@ -1423,8 +1429,8 @@ subroutine execute(me, pyfile, istat, python)
             end if
 
             !run the file using python:
-            if (index(file,' ')>0) then
-                ! space in path, probably should enclose in quotes
+            if (file(1:1)/='"') then
+                ! if not already in quotes, should enclose in quotes
                 call execute_command_line(python_//' "'//file//'"')
             else
                 call execute_command_line(python_//' '//file)

test/test.f90

@@ -201,5 +201,11 @@ program test
                      dpi='200', &
                      transparent=.true.,istat=istat, python='python')
 
+    ! also test one with spaces and () in the filename
+    call plt%savefig(testdir//'error bar (1).png', &
+                     pyfile=testdir//'error bar (1).py', &
+                     dpi='200', &
+                     transparent=.true.,istat=istat, python='python')
+
     end program test
 !*****************************************************************************************