Mercurial > octave-antonio
comparison scripts/miscellaneous/run.m @ 19596:0e1f5a750d00
maint: Periodic merge of gui-release to default.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Tue, 20 Jan 2015 10:24:46 -0500 |
parents | a834b3151c7e 446c46af4b42 |
children | 4197fc428c7d |
comparison
equal
deleted
inserted
replaced
19592:37d37297acf8 | 19596:0e1f5a750d00 |
---|---|
51 f = [f ext]; | 51 f = [f ext]; |
52 ext = ".m"; | 52 ext = ".m"; |
53 script = [script ".m"]; | 53 script = [script ".m"]; |
54 endif | 54 endif |
55 endif | 55 endif |
56 | 56 |
57 if (! exist (script, "file")) | 57 if (! exist (script, "file")) |
58 error ("run: file SCRIPT must exist and be a valid Octave scriptfile"); | 58 error ("run: file SCRIPT must exist and be a valid Octave scriptfile"); |
59 endif | 59 endif |
60 | 60 |
61 if (! isempty (d)) | 61 if (! isempty (d)) |
62 if (exist (d, "dir")) | 62 if (exist (d, "dir")) |
63 startdir = pwd (); | 63 startdir = pwd (); |
64 d = canonicalize_file_name (d); | 64 d = canonicalize_file_name (d); |
65 unwind_protect | 65 unwind_protect |