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

Contents of /meta-cvs/F-0C9187C87304A15BD59A42657A3BE5A3

Parent Directory Parent Directory | Revision Log Revision Log


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

  ViewVC Help
Powered by ViewVC 1.1.5