# HG changeset patch # User John W. Eaton # Date 1360444113 18000 # Node ID 003100ee9e0d33b9e9c1646c6f2f218686a5628b # Parent bbef6907d766321e54ce8ddba01bd195e9b4b149 * edit.m: Undo string escape sequences on values used in sprintf formats. diff -r bbef6907d766 -r 003100ee9e0d scripts/miscellaneous/edit.m --- a/scripts/miscellaneous/edit.m Mon Feb 11 11:46:38 2013 -0500 +++ b/scripts/miscellaneous/edit.m Sat Feb 09 16:08:33 2013 -0500 @@ -206,10 +206,11 @@ if (nargin < 1) if (exist (FUNCTION.HOME, "dir") == 7 && (isunix () || ! ispc ())) system (cstrcat ("cd \"", FUNCTION.HOME, "\" ; ", - sprintf (FUNCTION.EDITOR, "")), + sprintf (undo_string_escapes (FUNCTION.EDITOR), "")), [], FUNCTION.MODE); else - system (sprintf (FUNCTION.EDITOR,""), [], FUNCTION.MODE); + system (sprintf (undo_string_escapes (FUNCTION.EDITOR), ""), + [], FUNCTION.MODE); endif return; endif @@ -279,7 +280,8 @@ ## If the file exists, then edit it. if (FUNCTION.EDITINPLACE) ## Edit in place even if it is protected. - system (sprintf (FUNCTION.EDITOR, cstrcat ("\"", fileandpath, "\"")), + system (sprintf (undo_string_escapes (FUNCTION.EDITOR), + cstrcat ("\"", fileandpath, "\"")), [], FUNCTION.MODE); return; else @@ -296,7 +298,8 @@ else fclose (fid); endif - system (sprintf (FUNCTION.EDITOR, cstrcat ("\"", fileandpath, "\"")), + system (sprintf (undo_string_escapes (FUNCTION.EDITOR), + cstrcat ("\"", fileandpath, "\"")), [], FUNCTION.MODE); return; endif @@ -312,7 +315,8 @@ case {"cc", "m"} 0; otherwise - system (sprintf (FUNCTION.EDITOR, cstrcat ("\"", fileandpath, "\"")), + system (sprintf (undo_string_escapes (FUNCTION.EDITOR), + cstrcat ("\"", fileandpath, "\"")), [], FUNCTION.MODE); return; endswitch @@ -459,7 +463,8 @@ fclose (fid); ## Finally we are ready to edit it! - system (sprintf (FUNCTION.EDITOR, cstrcat ("\"", fileandpath, "\"")), + system (sprintf (undo_string_escapes (FUNCTION.EDITOR), + cstrcat ("\"", fileandpath, "\"")), [], FUNCTION.MODE); endfunction