Mercurial > hg > octave-lyh

comparison scripts/miscellaneous/unpack.m @ 11587:c792872f8942

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
all script files: untabify and strip trailing whitespace
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:35:29 -0500
parents fd0a3ac60b0e
children d5bd2766c640
comparison
equal deleted inserted replaced
11586:12df7854fa7c 11587:c792872f8942
1 ## Copyright (C) 2006-2011 Bill Denney 1 ## Copyright (C) 2006-2011 Bill Denney
2 ## 2 ##
3 ## This file is part of Octave. 3 ## This file is part of Octave.
4 ## 4 ##
5 ## Octave is free software; you can redistribute it and/or modify it 5 ## Octave is free software; you can redistribute it and/or modify it
6 ## under the terms of the GNU General Public License as published by 6 ## under the terms of the GNU General Public License as published by
7 ## the Free Software Foundation; either version 3 of the License, or (at 7 ## the Free Software Foundation; either version 3 of the License, or (at
138 "unzip -q \"%s\"", ... 138 "unzip -q \"%s\"", ...
139 @__parse_zip__, false}; 139 @__parse_zip__, false};
140 endif 140 endif
141 141
142 nodotext = ext(! ismember (ext, ".")); 142 nodotext = ext(! ismember (ext, "."));
143 143
144 origdir = pwd (); 144 origdir = pwd ();
145 145
146 if (isfield (commandlist, nodotext)) 146 if (isfield (commandlist, nodotext))
147 [commandv, commandq, parser, move] = deal (commandlist.(nodotext){:}); 147 [commandv, commandq, parser, move] = deal (commandlist.(nodotext){:});
148 cstartdir = canonicalize_file_name (origdir); 148 cstartdir = canonicalize_file_name (origdir);