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

Contents of /meta-cvs/F-0C9187C87304A15BD59A42657A3BE5A3

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.70 - (hide annotations)
Fri Mar 15 23:13:55 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
Changes since 1.69: +12 -0 lines
* add.lisp (mcvs-add): Error message changed to tell user to use
-R to add directory.

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

  ViewVC Help
Powered by ViewVC 1.1.5