/[meta-cvs]/meta-cvs/F-0C9187C87304A15BD59A42657A3BE5A3
ViewVC logotype

Contents of /meta-cvs/F-0C9187C87304A15BD59A42657A3BE5A3

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.69 - (hide annotations)
Fri Mar 15 22:58:57 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
Changes since 1.68: +4 -0 lines
* remove.lisp (mcvs-remove-wrapper): Remove bogus error check.
1 kaz 1.69 2002-03-15 Kaz Kylheku <kaz@ashi.footprints.net>
2    
3     * remove.lisp (mcvs-remove-wrapper): Remove bogus error check.
4    
5 kaz 1.66 2002-03-14 Kaz Kylheku <kaz@ashi.footprints.net>
6    
7 kaz 1.68 * checkout.lisp (mcvs-checkout): Bugfix: must use checkout-dir, not
8     module, when testing whether directory exists or was created properly.
9    
10     2002-03-14 Kaz Kylheku <kaz@ashi.footprints.net>
11    
12 kaz 1.67 Update takes file arguments now.
13    
14     * update.lisp (mcvs-update): If filename arguments are given, then
15     just call mcvs-generic to do the work, but suppress the operation on
16     meta files. If no filename arguments are given, then update everything.
17     If the -p option is present, no synchronization is needed, before or
18     after.
19     (mcvs-update-wrapper): Pass command arguments down to mcvs-update.
20    
21     * mcvs-main.lisp (*update-options*): Add "p" option.
22    
23     * generic.lisp (mcvs-generic): New keyword parameter need-sync-after,
24     a generalized boolean which can tell the function to do a
25     mapping-synchronize after executing the CVS command.
26    
27     2002-03-14 Kaz Kylheku <kaz@ashi.footprints.net>
28    
29 kaz 1.66 * filt.lisp (filt-select-map): Do allow a date and revision to be
30     specified; the revision could be a branch tag.
31    
32 kaz 1.62 2002-03-13 Kaz Kylheku <kaz@ashi.footprints.net>
33    
34 kaz 1.65 * mapping.lisp (malformed-map): New function.
35     (mapping-dupe-check): Perform extra error checks when reading
36     mapping, and turn them into a condition with a ``nice'' error message.
37    
38     2002-03-13 Kaz Kylheku <kaz@ashi.footprints.net>
39    
40 kaz 1.64 * mcvs-filt.lisp (filt-select-map): Handle error gracefully
41     when reading map. It's easy to give CVS is a nonexistent tag.
42    
43     2002-03-13 Kaz Kylheku <kaz@ashi.footprints.net>
44    
45 kaz 1.63 The filt command takes arguments to select alternate revision
46     of map.
47    
48     * mcvs-main.lisp (*filt-options*): New constant.
49     (*mcvs-command-table*): Updated with new options.
50     (mcvs-debug-shell): Restart name changed during debugging of filt
51     changes.
52    
53     * filt.lisp (filt-select-map): New function. Loads either the
54     local mapping, or retrieves an alternate mapping from CVS based
55     on command line options.
56     (mcvs-filt): Use filt-select-map rather than mapping-read.
57    
58     2002-03-13 Kaz Kylheku <kaz@ashi.footprints.net>
59    
60 kaz 1.62 * generic.lisp (mcvs-generic): Add .cvsignore to the list of
61     metafiles.
62    
63 kaz 1.53 2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
64    
65 kaz 1.61 * import.lisp (mcvs-import): Create a .cvsignore file for ignoring
66     MAP-LOCAL.
67    
68     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
69    
70 kaz 1.60 Fix trailing slash bug in mcvs mv.
71    
72     * move.lisp (simple-move-to-dir): Canonicalize path after catenating
73     destination and file base name. This nukes a double slash if
74     we move to a name with a trailing slash.
75     (move-guts): Treat a destination name that has a trailing slash
76     as a directory, unless it exists already as a non-directory.
77    
78     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
79    
80 kaz 1.59 * mcvs-main.lisp (*cvs-options*): Added "error-terminate" and
81     "error-continue".
82     (*usage*): Update and reformat help text.
83     (mcvs-execute): Process "error-terminate" and "error-continue"
84     options.
85    
86     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
87    
88 kaz 1.58 * mapping.lisp (mapping-update): Messages related to moving,
89     adding or removing files promoted to terse level, so only -Q
90     can suppress them.
91    
92     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
93    
94 kaz 1.57 * update.lisp (mcvs-update): Changing level of chatter messages.
95     * move.lisp (mcvs-move): Likewise.
96     * add.lisp (mcvs-add): Likewise.
97     * remove.lisp (mcvs-remove): Likewise.
98     * checkout.lisp (mcvs-checkout): Likewise.
99     * generic.lisp (mcvs-generic): Likewise.
100     * import.lisp (mcvs-import): Likewise.
101     * mapping.lisp (mapping-dupe-check): Likewise.
102     (mapping-update): Likewise.
103    
104     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
105    
106 kaz 1.56 Support for -q, -Q and -e global options.
107    
108     * posix.lisp (*editor*): New special variable.
109     (edit-file): Check *editor* variable; if not nil, use it.
110    
111     * mcvs-main.lisp (*usage*): Update help text.
112     (mcvs-execute): Set *mcvs-chatter-level* according to -q or -Q.
113     Set *editor* if -e is specified.
114    
115     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
116    
117 kaz 1.55 * mcvs-main.lisp (*cvs-options*): Remove obsolete "a".
118     (*cvs-options-arg*): Add missing "r".
119     (*usage*): New constant, help text.
120     (mcvs-execute): Process help and version command line options.
121    
122     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
123    
124 kaz 1.54 * options.lisp (parse-opt): Make error messages more consistent.
125    
126     2002-03-12 Kaz Kylheku <kaz@ashi.footprints.net>
127    
128 kaz 1.53 * find-bind.lisp (find-bind): Make rem-var optional; sometimes
129     the user might not care about the remaining unmatched list.
130    
131 kaz 1.49 2002-03-11 Kaz Kylheku <kaz@ashi.footprints.net>
132    
133 kaz 1.52 * find-bind.lisp (find-bind): Documentation string change. Clarify
134     that default values are substituted whenever a variable would
135     otherwise be bound to the value NIL, even through an explicit
136     match.
137    
138     2002-03-11 Kaz Kylheku <kaz@ashi.footprints.net>
139    
140 kaz 1.51 Sane filtering of -d option in checkout.
141    
142     * find-bind.lisp (find-bind): Variable bindings can specify
143     a third element, which provides a default value for any variables
144     that turn out NIL.
145    
146     * checkout.lisp (mcvs-checkout): Filter out the -d dir option,
147     and use it to override the name of the checkout directory,
148     the way CVS checkout does it.
149    
150     2002-03-11 Kaz Kylheku <kaz@ashi.footprints.net>
151    
152 kaz 1.50 Bugfix: mcvs add was not processing existing :ignore's in MCVS/TYPES.
153    
154     * add.lisp (mcvs-add): Use old types as well as new types
155     to filter for ignores.
156    
157     2002-03-11 Kaz Kylheku <kaz@ashi.footprints.net>
158    
159 kaz 1.49 * find-bind.lisp: New file.
160     (find-bind-extract-vals): New function.
161     (find-bind): New macro.
162    
163     * error.lisp (restart-destructure): Macro removed.
164     (mcvs-error-handler): Uses generic find-bind instead of
165     restart-destructure.
166    
167 kaz 1.43 2002-03-09 Kaz Kylheku <kaz@ashi.footprints.net>
168    
169 kaz 1.48 * filt.lisp (mcvs-filt): Bugfix: do not stop processing line
170     if F- file name is not found in hash table.
171    
172     2002-03-09 Kaz Kylheku <kaz@ashi.footprints.net>
173    
174 kaz 1.47 Commit is handled through mcvs-generic, so it can take
175     filename arguments, and honor --nometa.
176    
177     * commit.lisp: File removed.
178     (mcvs-commit): Function removed.
179     (mcvs-commit-wrapper): Moved to generic.lisp.
180    
181     * generic.lisp (mcvs-commit-wrapper): Moved from commit.lisp,
182     changed to invoke mcvs-generic.
183     (mcvs-generic): Only add TYPES file to list if it actually
184     exists.
185    
186     2002-03-09 Kaz Kylheku <kaz@ashi.footprints.net>
187    
188 kaz 1.46 New --nometa command line option.
189    
190     * mcvs-main.lisp (*cvs-options*): Add "nometa" to list.
191     (mcvs-execute): Filter global options to recognize
192     Meta-CVS-specific ones.
193    
194     * options.lisp (*nometa-option*): New special variable.
195     (filter-global-options): New function.
196    
197     * generic.lisp (mcvs-generic): Honor *nometa-option* special
198     variable.
199    
200     2002-03-09 Kaz Kylheku <kaz@ashi.footprints.net>
201    
202 kaz 1.45 * generic.lisp (mcvs-generic): Make sure TYPES file is
203     included in list of files.
204    
205     2002-03-09 Kaz Kylheku <kaz@ashi.footprints.net>
206    
207 kaz 1.44 * mcvs-main.lisp (*add-options*): Support -R option for add.
208     Thus, recursive add works now.
209    
210     2002-03-09 Kaz Kylheku <kaz@ashi.footprints.net>
211    
212 kaz 1.43 Fix mcvs filt so it handles suffixed F- files properly.
213    
214     * filt.lisp (make-filt-hash): New function.
215     (mcvs-filt): After matching hex digits, also check for
216     a suffix match.
217    
218 kaz 1.40 2002-02-17 Kaz Kylheku <kaz@ashi.footprints.net>
219    
220 kaz 1.42 Support for file type keyword treatment under mcvs add.
221    
222     * add.lisp (mcvs-add): Restructured to build up list of new file
223     suffixes, allow the user to edit the file which determines how
224     they are treated, filter out ignored files and pass -k options
225     to multiple cvs adds.
226    
227     * types.lisp (*mcvs-new-types*): New constant.
228     (*types-comments*): Constant moved here from import.lisp.
229     (types-remove-ignores): New function. Code factored out from
230     mcvs-import.
231     (types-let-user-edit): Likewise.
232     (types-make-cvs-adds): New function.
233    
234     * import.lisp (*types-comments*): Constant removed. Moved to
235     types.lisp
236     (mcvs-import): Code factored out to new functions in types.lisp, which
237     are also used by add.lisp.
238    
239     2002-02-17 Kaz Kylheku <kaz@ashi.footprints.net>
240    
241 kaz 1.41 * print.lisp: New file.
242     (print-assoc-list): New function.
243     * types.lisp: Use print-assoc-list to nicely print the types.
244     * import.lisp (mcvs-import): Don't bother getting user to
245     edit the types if the type list is empty. In fact, don't
246     even create the file.
247    
248     2002-02-17 Kaz Kylheku <kaz@ashi.footprints.net>
249    
250     * add.lisp (mcvs-add): Use new form of mapping-generate-name.
251    
252     2002-02-17 Kaz Kylheku <kaz@ashi.footprints.net>
253    
254 kaz 1.40 * import.lisp (mcvs-import): Fix broken restart for re-editing
255     the types file.
256     (*types-comments*): Drastically shorten the help text.
257    
258 kaz 1.38 2002-02-16 Kaz Kylheku <kaz@ashi.footprints.net>
259    
260 kaz 1.39 Support for filetypes in import.
261    
262     * posix.lisp (suffix): Separator character parameter is optional;
263     multiple occurences of character lead to one big suffix like
264     ".tar.gz" instead of ".gz". A leading dot means it's not a suffix but
265     a hidden file like ".exrc".
266     (edit-file): New function, brings up text editor for specified file.
267    
268     * clisp-linux.lisp (env-lookup): New function for environment
269     variable lookup.
270    
271     * types.lisp: New source file.
272     (*mcvs-types-name*, *mcvs-types*): New constants for TYPES filename.
273     (types-read, types-write, types-sanity-check,
274     types-to-import-wrapper-args): New functions.
275    
276     * import.lisp (*types-comments*): New constant.
277     (mcvs-import): Restructured to build up list of file suffixes,
278     allow the user to edit the file which determines how they
279     are treated, filter out ignored files and pass -W options to cvs import
280     to handle the rest. Failed cvs import is turned into restartable
281     condition.
282    
283     * mapping.lisp (mapping-generate-name): Takes a suffix parameter.
284     The F-files now carry a suffix obtained from the original file,
285     because I have concluded that this was the only reasonable way
286     to integrate with CVS.
287    
288     2002-02-16 Kaz Kylheku <kaz@ashi.footprints.net>
289    
290 kaz 1.38 * add.lisp (mcvs-add): Last change completely broke add due
291     to not breaking out of the retry loop.
292    
293 kaz 1.36 2002-02-13 Kaz Kylheku <kaz@ashi.footprints.net>
294    
295 kaz 1.37 * move.lisp (mcvs-move): If the mapping-update operation returns
296     nil, or terminates by a non-local jump, restore the filemap.
297     * mapping.lisp (mapping-update): When returning normally,
298     return t. When returning after doing a rollback, return nil.
299    
300     2002-02-13 Kaz Kylheku <kaz@ashi.footprints.net>
301    
302 kaz 1.36 * error.lisp (mcvs-error-handler): Bugfix. We were closing over
303     a binding of the iteration variable of a dolist, which has only
304     one binding over the entire loop.
305    
306     * mapping.lisp (mapping-update): Gathers up info all local
307     clobbered files, and then throw the error. Provides restart
308     which allows user to print the list of clobbered files, and
309     a restart which allows the user to have those files clobbered.
310    
311     2002-02-13 Kaz Kylheku <kaz@ashi.footprints.net>
312    
313     * checkout.lisp (mcvs-checkout-wrapper): Bugfix for last bugfix.
314    
315 kaz 1.35 2002-02-11 Kaz Kylheku <kaz@ashi.footprints.net>
316    
317     * checkout.lisp (mcvs-checkout-wrapper): Bugfix for bad
318     destructuring-bind if there are no arguments.
319    
320 kaz 1.30 2002-02-10 Kaz Kylheku <kaz@ashi.footprints.net>
321    
322 kaz 1.34 * mapping.lisp (mapping-difference): Reformatted documentation string.
323     (mapping-update): Implemented a continue restart which rolls back
324     the changes done to the local filesystem.
325    
326     2002-02-10 Kaz Kylheku <kaz@ashi.footprints.net>
327    
328 kaz 1.31 * error.lisp (mcvs-error-handler): Rearranging the menu,
329     so "T" is clumped with the main options, and any special restarts
330 kaz 1.32 are clearly separated. Changed wording.
331 kaz 1.31
332     2002-02-10 Kaz Kylheku <kaz@ashi.footprints.net>
333    
334 kaz 1.30 * update.lisp (mcvs-update): Re-print the "Invoking CVS" chatter
335     if the user re-tries the error.
336    
337     * add.lisp (mcvs-add): CVS failure is now a restartable error;
338 kaz 1.33 user can decide whether to roll back the effects or retry the
339     CVS add, or terminate to keep the effects anyway despite
340     the failed add.
341 kaz 1.30
342     2002-02-10 Kaz Kylheku <kaz@ashi.footprints.net>
343    
344     * install.sh: Stop the script if there are compilation errors.
345    
346 kaz 1.24 2002-02-09 Kaz Kylheku <kaz@ashi.footprints.net>
347    
348 kaz 1.29 * error.lisp (*mcvs-errors-occured-p*): New special variable.
349     (mcvs-error-handler): Set *mcvs-errors-occured-p* to T.
350     * mcvs-main.lisp (mcvs): Take *mcvs-errors-occured-p* into
351     account in computing termination status.
352    
353     2002-02-09 Kaz Kylheku <kaz@ashi.footprints.net>
354    
355 kaz 1.28 * update.lisp: Remove spurious newlines from error messages.
356     * add.lisp: Likewise.
357     * options.lisp: Likewise.
358     * mapping.lisp: Likewise.
359    
360     2002-02-09 Kaz Kylheku <kaz@ashi.footprints.net>
361    
362 kaz 1.27 Adding some restarts around cvs update.
363    
364     * posix.lisp (execute-command-xargs): Bail with nil return
365     value if any command line fails.
366    
367     * update.lisp (mcvs-update): Tests return value of execute-program
368     and signal condition if it's nil. Provides a continue restart
369     as well as a retry restart to try the command again.
370    
371     * error.lisp (mcvs-error-handler): Show retry restarts as
372     a special menu item "R".
373    
374     2002-02-09 Kaz Kylheku <kaz@ashi.footprints.net>
375    
376 kaz 1.26 Added a much improved error handling routine in anticipation
377     of better use of restarts.
378    
379     * error.lisp: New file
380     (restart-destructure): New macro.
381     (*mcvs-error-treatment*): Special variable, moved here from
382     mcvs-main.
383     (mcvs-error-handler): New function.
384    
385     * mcvs-main.lisp (mcvs-top-error-handler): Function removed.
386     (mcvs-execute): Bind error to new mcvs-error-handler instad
387     of mcvs-top-error-handler.
388    
389     2002-02-09 Kaz Kylheku <kaz@ashi.footprints.net>
390    
391 kaz 1.25 * mcvs-main.lisp (*mcvs-command-table*): The "stat" abbreviation
392     for status command added.
393    
394     2002-02-09 Kaz Kylheku <kaz@ashi.footprints.net>
395    
396 kaz 1.24 Hooking conversion tool into command structure.
397    
398     * mcvs-main.lisp (*convert-options*): New constant.
399     (*mcvs-command-table*): New entry for mcvs-convert-wrapper.
400     * convert.lisp (mcvs-convert): Fix reference to nonexistent variable.
401     (mcvs-convert-wrapper): New function.
402    
403 kaz 1.22 2002-02-08 Kaz Kylheku <kaz@ashi.footprints.net>
404    
405 kaz 1.23 Beginning work on repository conversion utility.
406    
407     * convert.lisp: New file. Contains conversion utility
408     to make an Meta-CVS repository from an ordinary CVS repository,
409     while preserving all history, tags and branches.
410     (remove-attic-component, classify-tags, read-tags,
411     mcvs-convert): New functions.
412    
413     * posix.lisp (suffix): New function. Computes suffix of file.
414     (execute-program-xargs): New optional parameter, for specifying
415     fixed part added at the end of each generated command line.
416    
417     * mapping.lisp (*mcvs-map-name*, *mcvs-local-map-name*): New constants.
418     (*mcvs-map*, *mcvs-map-local*): Redefined in terms of new constants.
419     (mapping-generate-name): New key parameter no-dir for not adding
420     the directory prefix.
421    
422     2002-02-08 Kaz Kylheku <kaz@ashi.footprints.net>
423    
424 kaz 1.22 * checkout.lisp (mcvs-checkout): Ensure local mapping is
425     sorted when written out, for easier comparisons.
426    
427 kaz 1.21 2002-02-07 Kaz Kylheku <kaz@ashi.footprints.net>
428    
429     * sync.lisp (synchronize-files): Return :dir symbol when either
430     argument is a directory.
431     * mapping.lisp (mapping-synchronize): Chatter output messages
432     are shorter. Handles :dir return value from synchronize-files.
433     (mapping-update): New sanity checks for moved and added
434     files, to avoid clobbering local files. Removed redundant
435     call to ensure-directories-exit in move logic, because
436     synchronize-files will do it anyway. Chatter messages reordered
437     to occur before their corresponding action is done.
438    
439     2002-02-07 Kaz Kylheku <kaz@ashi.footprints.net>
440    
441     Improve error handling, and builtin ``debug shell''.
442    
443     * mcvs-main.lisp (*mcvs-error-treatment*): Special variable
444     can have new domain value, namely :decline.
445     (mcvs-top-error-handler): Print error message when terminating
446     non-restartable error. Handle new :decline treatment by
447     simply returning.
448     (mcvs-debug-shell): Set *mcvs-error-treatment* to :decline
449     so that errors are caught by debugger.
450    
451 kaz 1.20 2002-02-04 Kaz Kylheku <kaz@ashi.footprints.net>
452    
453     * mapping.lisp (mapping-sort): Removed function.
454     (mapping-write): Sort written map by F- file names,
455     not by path names. This is far better for merging, because
456     files stay in the same place when they are renamed.
457    
458 kaz 1.17 2002-02-03 Kaz Kylheku <kaz@ashi.footprints.net>
459    
460 kaz 1.19 Added status, log and annotate.
461    
462     * mcvs-main.lisp: (*log-options*, *status-options*,
463     *annotate-options*): New constants.
464     (*mcvs-command-table*): Add new entries.
465    
466     * generic-lisp (mcvs-log-wrapper, mcvs-status-wrapper,
467     mcvs-annotate-wrapper): New functions.
468    
469     2002-02-03 Kaz Kylheku <kaz@ashi.footprints.net>
470    
471 kaz 1.18 Added tag command.
472    
473     * diff.lisp: File renamed to generic.lisp.
474     (mcvs-diff): Function renamed to mcvs-generic.
475    
476     * generic.lisp (mcvs-generic): Function no longer dedicated to
477     diffing only; takes CVS command to execute as an argument,
478     also takes arguments and files as separate lists.
479     (mcvs-diff-wrapper): Modified to invoke mcvs-generic properly.
480     (mcvs-tag-wrapper): New function, uses mcvs-generic to implement
481     tag command.
482    
483     * mcvs-main.lisp (*tag-options*): New constant.
484     (*mcvs-command-table*): New entry for tag command.
485    
486     2002-02-03 Kaz Kylheku <kaz@ashi.footprints.net>
487    
488 kaz 1.17 Added workaround for operating system argument passing limitations,
489     resembling the Unix xargs utility. Also, trimmed some fat
490     from the basename function.
491    
492     * clisp-linux.lisp: (*argument-limit*): New constant added.
493     (arglist-to-command-string): Function removed.
494     (execute-program): Function removed.
495     (shell-interpreter): New function, wrapper for CLISP's shell
496     function, turns exit status into T (success) or NIL (failure).
497    
498     * diff.lisp (mcvs-diff): Uses execute-program-xargs instead
499     of execute-program.
500    
501     * posix.lisp (basename): Does not canonicalize path name. This
502     turns out to be an unnecessary performance hit in some cases.
503     (arglist-to-command-string): New function. Similar to what was
504     removed from clisp-linux, but this one properly escapes all
505     shell metacharacters.
506     (execute-program): New function, calls shell-interpreter.
507     (execute-program-xargs): New function. Takes two argument lists.
508     Forms one or more command lines by combining the first argument list
509     with one or more pieces of the second argument list, and
510     executes each command. The length of the pieces is determined
511     by the argument passing limit.
512    
513     * dirwalk.lisp (ensure-directories-gone): Add use of
514     canonicalize-path because basename doesn't do it.
515    
516 kaz 1.12 2002-02-02 Kaz Kylheku <kaz@ashi.footprints.net>
517    
518 kaz 1.16 Algorithmic efficiency improvements. No longer using
519     abstract set operations to update file structure or find
520     duplicates in the maps. Could still streamline the sorting.
521    
522     * mapping.lisp (mapping-sort): Express more succinctly using key.
523     (mapping-dupe-check): Rewrite using loop over sorted lists.
524     (mapping-difference): New function for computing mapping change.
525     (mapping-update): Modify to use mapping-difference.
526    
527     2002-02-02 Kaz Kylheku <kaz@ashi.footprints.net>
528    
529 kaz 1.15 * mapping.lisp (mapping-update): When moving files, ensure
530     that the target is unlinked if it exists.
531    
532     * move.lisp (simple-rename): No longer do target unlinking
533     here. Also bugfix: it wasn't handling renames of directories
534     containing just one file.
535    
536     2002-02-02 Kaz Kylheku <kaz@ashi.footprints.net>
537    
538 kaz 1.13 * mapping.lisp (mapping-dupe-check): New function for
539     detecting duplicate objects or paths in a mapping.
540     (mapping-sane-p): Function removed.
541     (mapping-read): Use mapping-dupe-check to verify a map
542     when asked by the sanity-check keyword.
543     (mapping-update): Specify sanity check when reading MCVS/MAP.
544    
545 kaz 1.14 * checkout.lisp (mcvs-checkout): Checkout also performs
546     sanity check.
547    
548 kaz 1.13 2002-02-02 Kaz Kylheku <kaz@ashi.footprints.net>
549    
550 kaz 1.12 * mcvs-main.lisp (mcvs): Use CLISP's exit function correctly
551     to establish proper termination status.
552    
553 kaz 1.8 2002-01-31 Kaz Kylheku <kaz@ashi.footprints.net>
554    
555 kaz 1.10 * mcvs-main.lisp (mcvs-execute): Parse command-specific options
556     properly based on knowledge of each command's set of options.
557     (parse-args): Function removed.
558    
559 kaz 1.11 * options.lisp (parse-opt): Correctly process long options with
560     arguments. Argument is part of the string, separated by = symbol.
561    
562 kaz 1.10 2002-01-31 Kaz Kylheku <kaz@ashi.footprints.net>
563    
564 kaz 1.9 * options.lisp (parse-opt): When multiple options characters are
565     bunched up into one argument, and one of them other than the
566     last one takes an argument, then the remaining ones are
567     considered to constitute a string which is an argument to that
568     option. For instance -y32 means -y 32, not -y -3 -2, assuming
569     that y is an option that requires an argument.
570    
571     2002-01-31 Kaz Kylheku <kaz@ashi.footprints.net>
572    
573     Top level handler terminates by non-local exit back to
574     mcvs function, rather than by calling (exit).
575    
576     * mcvs-main.lisp (mcvs-top-error-handler): Restructured
577     to call (throw 'mcvs-exit t).
578     (mcvs-execute): Ensure that NIL is returned by normal exit.
579     (mcvs): Catches 'mcvs-exit throw, and calls (exit 0) or (exit 1)
580     accordingly.
581    
582    
583     2002-01-31 Kaz Kylheku <kaz@ashi.footprints.net>
584    
585 kaz 1.8 Renamed all ``filemap-'' functions to ``mapping-'' prefix.
586    
587     * mapping.lisp (filemap-generate-name, filemap-sort,
588     filemap-extract-paths, filemap-lookup, filemap-prefix-lookup,
589     filemap-prefix-matches, filemap-object-lookup,
590     filemap-same-object-p, filemap-same-path-p, filemap-moved-p,
591     filemap-rename-files, filemap-sane-p): Old names removed.
592     (mapping-generate-name, mapping-sort,
593     mapping-extract-paths, mapping-lookup, mapping-prefix-lookup,
594     mapping-prefix-matches, mapping-object-lookup,
595     mapping-same-object-p, mapping-same-path-p, mapping-moved-p,
596     mapping-rename-files, mapping-sane-p): New names created.
597     (mapping-read, mapping-write, mapping-synchronize,
598     mapping-update): Edit calls to renamed functions.
599     * add.lisp (mcvs-add): Likewise.
600     * diff.lisp (mcvs-diff): Likewise.
601     * filt.lisp (mcvs-filt): Likewise.
602     * import.lisp (mcvs-import): Likewise.
603     * move.lisp (simple-rename, simple-move-to-dir, move-guts): Likewise.
604     * remove.lisp (mcvs-remove): Likewise.
605    
606 kaz 1.6 2002-01-30 Kaz Kylheku <kaz@ashi.footprints.net>
607    
608 kaz 1.7 Factored out repeated code for reading and writing of the MAP and
609     MAP-LOCAL files.
610    
611     * mapping.lisp (mapping-read, mapping-write): New functions.
612     (mapping-synchronize, mapping-update): Use new functions.
613     * move.lisp (mcvs-move): Likewise.
614     * filt.lisp (mcvs-filt): Likewise.
615     * add.lisp (mcvs-add): Likewise.
616     * remove.lisp (mcvs-remove): Likewise.
617     * checkout.lisp (mcvs-checkout): Likewise.
618     * diff.lisp (mcvs-diff): Likewise.
619     * import.lisp (mcvs-import): Likewise.
620    
621     2002-01-30 Kaz Kylheku <kaz@ashi.footprints.net>
622    
623 kaz 1.6 * filt.lisp (mcvs-filt): use *mcvs-dir* variable instead of
624     hard coding "MCVS" string.
625    
626     2002-01-30 Kaz Kylheku <kaz@ashi.footprints.net>
627    
628     * MCVS-PAPER: Renamed to Meta-CVS-PAPER
629    
630     * README: Change all references to MCVS to Meta-CVS, the
631     new official name of the program.
632     * add.lisp: Likewise
633     * chatter.lisp: Likewise
634     * checkout.lisp: Likewise
635     * clisp-linux.lisp: Likewise
636     * commit.lisp: Likewise
637     * diff.lisp: Likewise
638     * dirwalk.lisp: Likewise
639     * filt.lisp: Likewise
640     * import.lisp: Likewise
641     * INSTALL: Likewise
642     * mapping.lisp: Likewise
643     * mcvs-main.lisp: Likewise
644     * Meta-CVS-PAPER: Likewise
645     * move.lisp: Likewise
646     * options.lisp: Likewise
647     * posix.lisp: Likewise
648     * RELEASE-NOTES: Likewise
649     * remove.lisp: Likewise
650     * restart.lisp: Likewise
651     * seqfuncs.lisp: Likewise
652     * split.lisp: Likewise
653     * sync.lisp: Likewise
654     * system.lisp: Likewise
655     * update.lisp: Likewise
656    
657 kaz 1.4 2002-01-28 Kaz Kylheku <kaz@ashi.footprints.net>
658    
659 kaz 1.5 * move.lisp (move-guts): test the actual filesystem as well
660     as the map for existence of a directory or file. This makes
661     the move operation behave better. Files can be moved to an
662     existing directory that is not known to MCVS, and a file
663     can properly clobber a target file that is not known to MCVS.
664    
665     * clisp-linux.lisp (directory-p, regular-p, symlink-p): define
666     methods for these generic functions for a NIL argument, such
667     that they return NIL.
668    
669     2002-01-28 Kaz Kylheku <kaz@ashi.footprints.net>
670    
671 kaz 1.4 * move.lisp (simple-move-to-dir): eliminated a bunch of code
672     with the result that mcvs mv now works more like the Unix mv
673     when moving a directory to another directory.
674    
675     * mcvs-main.lisp (mcvs-execute): fix bogus error message
676     when options are given but no command.
677    
678     * README: don't use -z3 in example because this style of
679     specifying an argument to an option doesn't work.
680    
681 kaz 1.1 2002-01-27 Kaz Kylheku <kaz@ashi.footprints.net>
682    
683     * add.lisp (mcvs-add): Remove bogus test for NIL or T; allow
684     recursivep to be a generalized boolean variable. This allows
685     mcvs add -R to work properly.
686 kaz 1.2
687     * mcvs-main.lisp (*cvs-command-options-arg*): add support
688     for -u parameter, useful in cvs diff.
689 kaz 1.3 (*mcvs-command-table*): Add "fi" shorthand for "filt".

  ViewVC Help
Powered by ViewVC 1.1.5