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

Contents of /meta-cvs/F-0C9187C87304A15BD59A42657A3BE5A3

Parent Directory Parent Directory | Revision Log Revision Log


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

  ViewVC Help
Powered by ViewVC 1.1.5