/[meta-cvs]/meta-cvs/F-AFC09F145399B1273F4BF98702F5BE8C
ViewVC logotype

Log of /meta-cvs/F-AFC09F145399B1273F4BF98702F5BE8C

Parent Directory Parent Directory | Revision Log Revision Log


Links to HEAD: (view) (annotate)
Sticky Tag:

Revision 1.41 - (view) (annotate) - [select for diffs]
Tue Nov 28 07:47:22 2006 UTC (7 years, 4 months ago) by kaz
Branch: MAIN
CVS Tags: HEAD, asdf-import-branch~branch-point, asdf-import-branch~merged-to-HEAD-0, mcvs-1-1-98
Branch point for: asdf-import-branch
Changes since 1.40: +5 -5 lines
Diff to previous 1.40 , to selected 1.12
More renaming to get rid of mcvs- prefix.

* code/chatter.lisp (*mcvs-debug*): Renamed to *chatter-debug*.
(*mcvs-info*, *mcvs-terse*, *mcvs-silent*): Similarly.
(*mcvs-chatter-level*): Renamed to *chatter-level*.

* code/unix.lisp (*mcvs-editor*): Renamed to *edit-program*.

* code/types.lisp (*mcvs-types-name*): Renamed to *types-file*.
(*mcvs-types*): Renamed to *types-path*.
(*mcvs-new-types*): Renamed to *types-new-path*.

* code/mapping.lisp (*mcvs-dir*): Renamed to *admin-dir*.
(*mcvs-map-name*): Renamed to *map-file*.
(*mcvs-map-local-name*): Renamed to *map-local-file*.
(*mcvs-displaced-name*): Renamed to *displaced-file*.
(*mcvs-map*): Renamed to *map-path*.
(*mcvs-map-local*): Renamed to *map-local-path*.
(*mcvs-displaced*): Renamed to *displaced-path*.

Revision 1.40 - (view) (annotate) - [select for diffs]
Tue Nov 28 04:12:08 2006 UTC (7 years, 4 months ago) by kaz
Branch: MAIN
Changes since 1.39: +52 -52 lines
Diff to previous 1.39 , to selected 1.12
Getting rid of mcvs- prefixes.

* code/package.lisp (defpackage): shadow the merge symbol.

* code/purge.lisp (mcvs-purge): renamed to purge
(mcvs-purge-wrapper): renamed to purge-wrapper

* code/restore.lisp (mcvs-restore): renamed to restore
(mcvs-restore-wrapper): renamed to restore-wrapper

* code/update.lisp (mcvs-update): renamed to update
(mcvs-update-wrapper): renamed to update-wrapper

* code/main.lisp (mcvs-help): renamed to help
(*mcvs-command-table*): renamed to *command-table*
(mcvs-terminate catch): renamed to terminate.

* code/execute.lisp (mcvs-execute): renamed to execute

* code/move.lisp (mcvs-move): renamed to move
(mcvs-move-wrapper): renamed to move-wrapper

* code/grab.lisp (mcvs-grab): renamed to grab
(mcvs-grab-wrapper): renamed to grab-wrapper

* code/prop.lisp (mcvs-prop): renamed to prop
(mcvs-prop-wrapper): renamed to prop-wrapper

* code/filt.lisp (mcvs-filt-loop): renamed to filt-loop
(mcvs-filt): renamed to filt
(mcvs-remote-filt): renamed to remote-filt
(mcvs-filt-wrapper): renamed to filt-wrapper
(mcvs-remote-filt-wrapper): renamed to remote-filt-wrapper

* code/branch.lisp (mcvs-branch): renamed to branch
(mcvs-branch-wrapper): renamed to branch-wrapper
(mcvs-merge): renamed to merge
(mcvs-list-branches): renamed to list-branches
(mcvs-merge-wrapper): renamed to merge-wrapper
(mcvs-remerge-wrapper): renamed to remerge-wrapper
(mcvs-list-branches-wrapper): renamed to list-branches-wrapper
(mcvs-switch-wrapper): renamed to switch-wrapper

* code/link.lisp (mcvs-link): renamed to ln
(mcvs-link-wrapper): renamed to link-wrapper

* code/watch.lisp (mcvs-watch): renamed to watch
(mcvs-watch-wrapper): renamed to watch-wrapper

* code/add.lisp (mcvs-add): renamed to add
(mcvs-add-wrapper): renamed to add-wrapper

* code/remove.lisp (mcvs-remove): renamed to rm
(mcvs-remove-wrapper): renamed to remove-wrapper

* code/convert.lisp (mcvs-convert): renamed to convert
(mcvs-convert-wrapper): renamed to convert-wrapper

* code/error.lisp (mcvs-terminate): renamed to terminate
(mcvs-error-handler): renamed to error-handler
(*mcvs-error-treatment*): renamed to *error-treatment*
(*mcvs-errors-occured-p*): renamed to *errors-occured-p*

* code/checkout.lisp (mcvs-checkout): renamed to checkout
(mcvs-checkout-wrapper): renamed to checkout-wrapper
(mcvs-export-wrapper): renamed to export-wrapper

* code/generic.lisp (mcvs-generic): renamed to generic
(mcvs-commit-wrapper): renamed to commit-wrapper
(mcvs-diff-wrapper): renamed to diff-wrapper
(mcvs-tag-wrapper): renamed to tag-wrapper
(mcvs-log-wrapper): renamed to log-wrapper
(mcvs-status-wrapper): renamed to status-wrapper
(mcvs-annotate-wrapper): renamed to annotate-wrapper
(mcvs-watchers-wrapper): renamed to watchers-wrapper
(mcvs-edit-wrapper): renamed to edit-wrapper
(mcvs-unedit-wrapper): renamed to unedit-wrapper
(mcvs-editors-wrapper): renamed to editors-wrapper
(mcvs-sync-to-wrapper): renamed to sync-to-wrapper
(mcvs-sync-from-wrapper): renamed to sync-from-wrapper

* code/create.lisp (mcvs-create): renamed to create
(mcvs-create-wrapper): renamed to create-wrapper

* code/remap.lisp (mcvs-remap): renamed to remap
(mcvs-remap-wrapper): renamed to remap-wrapper

* code/mapping.lisp (mcvs-locate): renamed to locate

Revision 1.39 - (view) (annotate) - [select for diffs]
Fri Nov 24 04:53:50 2006 UTC (7 years, 4 months ago) by kaz
Branch: MAIN
Changes since 1.38: +1 -1 lines
Diff to previous 1.38 , to selected 1.12
Stylistic change.

* code/add.lisp: Change in-package calls not to use the all-caps
"META-CVS" string string, but rather the :meta-cvs keyword.
* code/branch.lisp: Likewise.
* code/chatter.lisp: Likewise.
* code/checkout.lisp: Likewise.
* code/clisp-unix.lisp: Likewise.
* code/cmucl-unix.lisp: Likewise.
* code/convert.lisp: Likewise.
* code/create.lisp: Likewise.
* code/dirwalk.lisp: Likewise.
* code/error.lisp: Likewise.
* code/execute.lisp: Likewise.
* code/filt.lisp: Likewise.
* code/find-bind.lisp: Likewise.
* code/generic.lisp: Likewise.
* code/grab.lisp: Likewise.
* code/link.lisp: Likewise.
* code/main.lisp: Likewise.
* code/mapping.lisp: Likewise.
* code/memoize.lisp: Likewise.
* code/move.lisp: Likewise.
* code/multi-hash.lisp: Likewise.
* code/options.lisp: Likewise.
* code/paths.lisp: Likewise.
* code/print.lisp: Likewise.
* code/prop.lisp: Likewise.
* code/purge.lisp: Likewise.
* code/rcs-utils.lisp: Likewise.
* code/remap.lisp: Likewise.
* code/remove.lisp: Likewise.
* code/restart.lisp: Likewise.
* code/restore.lisp: Likewise.
* code/seqfuncs.lisp: Likewise.
* code/slot-refs.lisp: Likewise.
* code/split.lisp: Likewise.
* code/sync.lisp: Likewise.
* code/types.lisp: Likewise.
* code/unix.lisp: Likewise.
* code/update.lisp: Likewise.
* code/watch.lisp: Likewise.

Revision 1.38 - (view) (annotate) - [select for diffs]
Mon Mar 8 06:11:40 2004 UTC (10 years, 1 month ago) by kaz
Branch: MAIN
CVS Tags: mcvs-1-1-0
Changes since 1.37: +0 -8 lines
Diff to previous 1.37 , to selected 1.12
Revamped loading system. Got rid of require/provide in all
Lisp source files.

* code/mcvs.lisp: New file. Responsible for compiling and loading
everything in the right order.

* code/mcvs-main.lisp: File renamed to main.lisp.

* code/mcvs-package.lisp: File renamed to package.lisp.

* code/system.lisp: File removed.

Revision 1.37 - (view) (annotate) - [select for diffs]
Wed Jul 16 15:44:52 2003 UTC (10 years, 9 months ago) by kaz
Branch: MAIN
Changes since 1.36: +31 -25 lines
Diff to previous 1.36 , to selected 1.12
Merging from mcvs-1-0-branch.

* code/mcvs-generic.lisp (mcvs-generic): Removed
the default-include-meta-files keyword parameter.
(mcvs-tag, mcvs-commit): Remove use of keyword parameter.
This fixes the silly behavior of including meta files
even when the command line specifies a file list.
Also, bugfix: *nometa-option* now works when
global-if-empty-file-list is true, and there are no files.

* code/update.lisp (mcvs-update): Remove use of keyword
parameter in call to mcvs-generic.

Revision 1.29.2.7 - (view) (annotate) - [select for diffs]
Wed Jul 16 15:44:11 2003 UTC (10 years, 9 months ago) by kaz
Branch: mcvs-1-0-branch
CVS Tags: mcvs-1-0-10, mcvs-1-0-11, mcvs-1-0-12, mcvs-1-0-13, mcvs-1-0-9, mcvs-1-0-branch~merged-to-HEAD-0, mcvs-1-0-branch~merged-to-HEAD-1
Changes since 1.29.2.6: +31 -25 lines
Diff to previous 1.29.2.6 , to branch point 1.29 , to next main 1.41 , to selected 1.12
* code/mcvs-generic.lisp (mcvs-generic): Removed
the default-include-meta-files keyword parameter.
(mcvs-tag, mcvs-commit): Remove use of keyword parameter.
This fixes the silly behavior of including meta files
even when the command line specifies a file list.
Also, bugfix: *nometa-option* now works when
global-if-empty-file-list is true, and there are no files.

* code/update.lisp (mcvs-update): Remove use of keyword
parameter in call to mcvs-generic.

Revision 1.36 - (view) (annotate) - [select for diffs]
Thu May 1 05:40:54 2003 UTC (10 years, 11 months ago) by kaz
Branch: MAIN
Changes since 1.35: +2 -1 lines
Diff to previous 1.35 , to selected 1.12
Merging from mcvs-1-0-branch.

* code/generic.lisp (mcvs-generic): The after-synchronization
was going in both directions rather than just MCVS -> tree.

* code/mcvs-main.lisp (mcvs-execute): If not able to open controlling
tty, emit some warning messages that interactive error handling is
disabled. This alerts users to problems, like missing /dev directory
on Cygwin.

Revision 1.29.2.6 - (view) (annotate) - [select for diffs]
Thu May 1 05:39:58 2003 UTC (10 years, 11 months ago) by kaz
Branch: mcvs-1-0-branch
CVS Tags: mcvs-1-0-8
Changes since 1.29.2.5: +2 -1 lines
Diff to previous 1.29.2.5 , to branch point 1.29 , to selected 1.12
* code/generic.lisp (mcvs-generic): The after-synchronization
was going in both directions rather than just MCVS -> tree.

Revision 1.35 - (view) (annotate) - [select for diffs]
Thu Apr 24 04:33:15 2003 UTC (10 years, 11 months ago) by kaz
Branch: MAIN
Changes since 1.34: +29 -18 lines
Diff to previous 1.34 , to selected 1.12
Merging from mcvs-1-0-branch.

New commands, sync-from-cvs and sync-to-cvs.

* code/mcvs-main.lisp (*sync-to-cvs-options*, *sync-from-cvs-options*):
New option constants.
(*mcvs-command-table*): New entries.
(*usage*): New help text.

* code/generic.lisp (mcvs-generic): New keyword parameter
no-invoke-cvs.
(mcvs-sync-to-wrapper, mcvs-sync-from-wrapper): New functions.

Revision 1.29.2.5 - (view) (annotate) - [select for diffs]
Thu Apr 24 04:32:25 2003 UTC (10 years, 11 months ago) by kaz
Branch: mcvs-1-0-branch
CVS Tags: mcvs-1-0-7
Changes since 1.29.2.4: +29 -18 lines
Diff to previous 1.29.2.4 , to branch point 1.29 , to selected 1.12
New commands, sync-from-cvs and sync-to-cvs.

* code/mcvs-main.lisp (*sync-to-cvs-options*, *sync-from-cvs-options*):
New option constants.
(*mcvs-command-table*): New entries.
(*usage*): New help text.

* code/generic.lisp (mcvs-generic): New keyword parameter
no-invoke-cvs.
(mcvs-sync-to-wrapper, mcvs-sync-from-wrapper): New functions.

Revision 1.34 - (view) (annotate) - [select for diffs]
Sun Apr 13 14:39:12 2003 UTC (11 years ago) by kaz
Branch: MAIN
Changes since 1.33: +17 -9 lines
Diff to previous 1.33 , to selected 1.12
Merging from mcvs-1-0-branch.

* code/mapping.lisp (mapping-read): Provide a restart for
file errors, which lets the user interactively substitute an
empty map if the file can't be read. This is intended to handle
the case when MCVS/MAP is missing; for example, the user
updated to a sticky date for which no revision of the MAP
exists. The effect of continuing will be that all files
will disappear.
(mapping-synchronize): New :direction key
parameter, passed down to synchronize-filed. The new :no-sync
return value from synchronize-files is handled.
(mapping-update): Select the :right direction for synchronizing
moves, adds or rollbacks.

Revamped the synchronization logic. Synchronization now happens
in a specific direction.  For example, if we are doing a diff,
we just need to push changes from the tree to the MCVS directory,
not the other way around. Or: before an update or commit, we push from
the tree to MCVS, then after the update, in the other direction.

* code/update.lisp (mcvs-update): The before update is done
in the :left direction only, and the after update in the :right.

* code/move.lisp (mcvs-move): The just-in-case sync is done
in the :left direction only.

* code/link.lisp (mcvs-link): Likewise.

* code/remove.lisp (mcvs-remove): Likewise.

* code/add.lisp (mcvs-add): Get rid of mapping-synchronize call;
it's completely unnecessary, since the new files are not even
in the MAP-LOCAL, and the add logic explicitly links them into
the MCVS directory.

* code/generic.lisp (mcvs-generic): New keyword parameter,
need-sync-before. Before-synchronization done in :left direction,
after-synchronization in :right direction. Before-synchronization
is now not done by default; need-sync-before must be specified.
(mcvs-commit-wrapper): Specify before and after sync.
(mcvs-diff-wrapper, mcvs-status-wrapper,
mcvs-edit-wrapper): Explicitly specify before sync.
(mcvs-tag-wrapper, mcvs-annotate-wrapper): Implicitly specify no sync.
(mcvs-unedit-wrapper): Add before sync.

* code/sync.lisp (synchronize-files):  New key parameter :direction,
values can be :left, :right or :either. Default is :either.
If the value is :left or :right, then a sync is done only in that
direction, otherwise the value :no-sync is returned.
Behavior change: if the left file is missing (F- file in MCVS
directory) it is not re-created, but rather :no-sync is returned.
Also, if both files exist, have the same timestamp, and are
distinct objects, if the direction is :left or :right, then
the appropriate restart is automatically chosen. So this will
do the right thing on filesystems where link() is performed by
copying, without bothering the user with the error.

Revision 1.29.2.4 - (view) (annotate) - [select for diffs]
Sun Apr 13 06:22:43 2003 UTC (11 years ago) by kaz
Branch: mcvs-1-0-branch
CVS Tags: mcvs-1-0-6
Changes since 1.29.2.3: +17 -9 lines
Diff to previous 1.29.2.3 , to branch point 1.29 , to selected 1.12
Revamped the synchronization logic. Synchronization now happens
in a specific direction.  For example, if we are doing a diff,
we just need to push changes from the tree to the MCVS directory,
not the other way around. Or: before an update or commit, we push from
the tree to MCVS, then after the update, in the other direction.

* code/update.lisp (mcvs-update): The before update is done
in the :left direction only, and the after update in the :right.

* code/move.lisp (mcvs-move): The just-in-case sync is done
in the :left direction only.

* code/link.lisp (mcvs-link): Likewise.

* code/remove.lisp (mcvs-remove): Likewise.

* code/add.lisp (mcvs-add): Get rid of mapping-synchronize call;
it's completely unnecessary, since the new files are not even
in the MAP-LOCAL, and the add logic explicitly links them into
the MCVS directory.

* code/generic.lisp (mcvs-generic): New keyword parameter,
need-sync-before. Before-synchronization done in :left direction,
after-synchronization in :right direction. Before-synchronization
is now not done by default; need-sync-before must be specified.
(mcvs-commit-wrapper): Specify before and after sync.
(mcvs-diff-wrapper, mcvs-status-wrapper,
mcvs-edit-wrapper): Explicitly specify before sync.
(mcvs-tag-wrapper, mcvs-annotate-wrapper): Implicitly specify no sync.
(mcvs-unedit-wrapper): Add before sync.

* code/sync.lisp (synchronize-files):  New key parameter :direction,
values can be :left, :right or :either. Default is :either.
If the value is :left or :right, then a sync is done only in that
direction, otherwise the value :no-sync is returned.
Behavior change: if the left file is missing (F- file in MCVS
directory) it is not re-created, but rather :no-sync is returned.
Also, if both files exist, have the same timestamp, and are
distinct objects, if the direction is :left or :right, then
the appropriate restart is automatically chosen. So this will
do the right thing on filesystems where link() is performed by
copying, without bothering the user with the error.

* code/mapping.lisp (mapping-synchronize): New :direction key
parameter, passed down to synchronize-filed. The new :no-sync
return value from synchronize-files is handled.
(mapping-update): Select the :right direction for synchronizing
moves, adds or rollbacks.

Revision 1.33 - (view) (annotate) - [select for diffs]
Tue Feb 4 14:56:09 2003 UTC (11 years, 2 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-1-0-3
Changes since 1.32: +7 -6 lines
Diff to previous 1.32 , to selected 1.12
Merging from mcvs-1-0-branch.

Make tag command work on whole tree if no arguments are given,
just like commit.

* code/generic.lisp (mcvs-generic): no-fix-empty-filelist keyword
parameter renamed to global-if-empty-file-list, which more closely
reveals the purpose.
(mcvs-commit-wrapper): Use new keyword name.
(mcvs-tag-wrapper): Specify T value for :global-if-empty-filelist
argument, so the whole project is tagged by default if no arguments
are given.

Revision 1.29.2.3 - (view) (annotate) - [select for diffs]
Mon Feb 3 05:30:36 2003 UTC (11 years, 2 months ago) by kaz
Branch: mcvs-1-0-branch
CVS Tags: mcvs-1-0-2, mcvs-1-0-4, mcvs-1-0-5
Changes since 1.29.2.2: +7 -6 lines
Diff to previous 1.29.2.2 , to branch point 1.29 , to selected 1.12
Make tag command work on whole tree if no arguments are given,
just like commit.

* code/generic.lisp (mcvs-generic): no-fix-empty-filelist keyword
parameter renamed to global-if-empty-file-list, which more closely
reveals the purpose.
(mcvs-commit-wrapper): Use new keyword name.
(mcvs-tag-wrapper): Specify T value for :global-if-empty-filelist
argument, so the whole project is tagged by default if no arguments
are given.

Revision 1.32 - (view) (annotate) - [select for diffs]
Sun Jan 12 20:52:31 2003 UTC (11 years, 3 months ago) by kaz
Branch: MAIN
Changes since 1.31: +2 -2 lines
Diff to previous 1.31 , to selected 1.12
Merging from mcvs-1-0-branch.

Hard link sync optimization.

* code/mapping.lisp (mapping-synchronize): New optional parameter,
specifies map to use instead of reading *map-local*.

* code/mcvs-generic.lisp (mcvs-generic): Pass extra parameter to
mapping-synchronize to only sync the selected subset of files.

Revision 1.29.2.2 - (view) (annotate) - [select for diffs]
Sun Jan 12 20:49:45 2003 UTC (11 years, 3 months ago) by kaz
Branch: mcvs-1-0-branch
CVS Tags: mcvs-1-0-1
Changes since 1.29.2.1: +2 -2 lines
Diff to previous 1.29.2.1 , to branch point 1.29 , to selected 1.12
Hard link sync optimization.

* code/mapping.lisp (mapping-synchronize): New optional parameter,
specifies map to use instead of reading *map-local*.

* code/mcvs-generic.lisp (mcvs-generic): Pass extra parameter to
mapping-synchronize to only sync the selected subset of files.

Revision 1.31 - (view) (annotate) - [select for diffs]
Thu Oct 31 04:06:01 2002 UTC (11 years, 5 months ago) by kaz
Branch: MAIN
Changes since 1.30: +3 -0 lines
Diff to previous 1.30 , to selected 1.12
* code/mcvs-package.lisp: New file, defines META-CVS package.

* code/purge.lisp: Put all symbols in new package.
* code/restore.lisp: Likewise.
* code/paths.lisp: Likewise.
* code/install.sh: Likewise.
* code/restart.lisp: Likewise.
* code/update.lisp: Likewise.
* code/move.lisp: Likewise.
* code/grab.lisp: Likewise.
* code/unix.lisp: Likewise.
* code/slot-refs.lisp: Likewise.
* code/prop.lisp: Likewise.
* code/multi-hash.lisp: Likewise.
* code/rcs-utils.lisp: Likewise.
* code/branch.lisp: Likewise.
* code/find-bind.lisp: Likewise.
* code/execute.lisp: Likewise.
* code/link.lisp: Likewise.
* code/split.lisp: Likewise.
* code/watch.lisp: Likewise.
* code/clisp-unix.lisp: Likewise.
* code/add.lisp: Likewise.
* code/chatter.lisp: Likewise.
* code/print.lisp: Likewise.
* code/types.lisp: Likewise.
* code/remove.lisp: Likewise.
* code/convert.lisp: Likewise.
* code/error.lisp: Likewise.
* code/options.lisp: Likewise.
* code/dirwalk.lisp: Likewise.
* code/checkout.lisp: Likewise.
* code/generic.lisp: Likewise.
* code/sync.lisp: Likewise.
* code/create.lisp: Likewise.
* code/memoize.lisp: Likewise.
* code/seqfuncs.lisp: Likewise.
* code/cmucl-unix.lisp: Likewise.
* code/remap.lisp: Likewise.

* code/mapping.lisp: Put symbols in new package. Replace use
of CLISP specific substring function with subseq.
* code/filt.lisp: Likewise.

* code/mcvs-main.lisp: Put symbols in new package. The mcvs
function is renamed to main.

* code/install.sh: Generate mcvs script that uses qualified name
of new startup functiont to start the software.

Revision 1.30 - (view) (annotate) - [select for diffs]
Mon Oct 14 00:20:47 2002 UTC (11 years, 6 months ago) by kaz
Branch: MAIN
Changes since 1.29: +13 -0 lines
Diff to previous 1.29 , to selected 1.12
Merging from mcvs-1-0-branch.

* code/mcvs-main.lisp (*watchers-options*): New constant.
(*edit-options*): Likewise.
(*unedit-options*): Likewise.
(*editors-options*): Likewise.
(*mcvs-command-table*): Added watchers, edit unedit, and editors
commands.
(*usage*): Updated.

* code/generic.lisp (mcvs-watchers-wrapper, mcvs-edit-wrapper,
mcvs-unedit-wrapper, mcvs-editors-wrapper): New functions.

Revision 1.29.2.1 - (view) (annotate) - [select for diffs]
Mon Oct 14 00:19:14 2002 UTC (11 years, 6 months ago) by kaz
Branch: mcvs-1-0-branch
CVS Tags: mcvs-0-98, mcvs-0-99, mcvs-1-0
Changes since 1.29: +13 -0 lines
Diff to previous 1.29 , to selected 1.12
* code/mcvs-main.lisp (*watchers-options*): New constant.
(*edit-options*): Likewise.
(*unedit-options*): Likewise.
(*editors-options*): Likewise.
(*mcvs-command-table*): Added watchers, edit unedit, and editors
commands.
(*usage*): Updated.

* code/generic.lisp (mcvs-watchers-wrapper, mcvs-edit-wrapper,
mcvs-unedit-wrapper, mcvs-editors-wrapper): New functions.

Revision 1.29 - (view) (annotate) - [select for diffs]
Mon Oct 7 02:44:30 2002 UTC (11 years, 6 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-97, mcvs-1-0-branch~branch-point
Branch point for: mcvs-1-0-branch
Changes since 1.28: +2 -1 lines
Diff to previous 1.28 , to selected 1.12
* code/prop.lisp (mcvs-prop): Result of real-to-abstract-path
must be canonicalized.

* code/remove.lisp (mcvs-remove): Likewise.

* code/generic.lisp (mcvs-generic): Likewise.

Revision 1.28 - (view) (annotate) - [select for diffs]
Sat Oct 5 18:09:48 2002 UTC (11 years, 6 months ago) by kaz
Branch: MAIN
Changes since 1.27: +2 -2 lines
Diff to previous 1.27 , to selected 1.12
Error messages no longer specify prefixes like "mcvs:" or
"mcvs-remove:".

When no restarts are available, the error handler now adds the "mcvs:"
prefix when dumping the error text to the standard error stream,
and also adds a terminating newline.

The inability to write to the MAP file is converted to a more
informative error message.

New --debug option is supported to set the chatter level to 3.

Revision 1.27 - (view) (annotate) - [select for diffs]
Sat Aug 31 20:53:13 2002 UTC (11 years, 7 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-22, mcvs-0-23, mcvs-0-24, mcvs-0-95, mcvs-0-96
Changes since 1.26: +4 -1 lines
Diff to previous 1.26 , to selected 1.12
Merging symlink-branch to main trunk.

Revision 1.26.2.2 - (view) (annotate) - [select for diffs]
Sun Aug 25 18:20:45 2002 UTC (11 years, 7 months ago) by kaz
Branch: symlink-branch
CVS Tags: symlink-branch~merged-to-HEAD-0
Changes since 1.26.2.1: +1 -5 lines
Diff to previous 1.26.2.1 , to branch point 1.26 , to next main 1.41 , to selected 1.12
* code/add.lisp (mcvs-add): Change to new mapping-entry data structure
and handle symbolic links.

* code/types.lisp (types-remove-ignores, types-make-cvs-adds):
Change to new mapping-entry data structure.

* code/mapping.lisp (mapping-generate-name): Renamed to
mapping-generate-id. Interface changes slightly.
(mapping-extract-kind): New function, factored out from mcvs-generic.
(mapping-update): Unlink existing symbolic link before
re-linking it.

* code/convert.lisp (mcvs-convert): Use new name and interface
of mapping-generate-name function.

* code/create.lisp (mcvs-create): Likewise.

* code/generic.lisp (mcvs-generic): Code to extract :file
entries from map factored out to mapping-extract-kind.

Revision 1.26.2.1 - (view) (annotate) - [select for diffs]
Sun Aug 25 17:10:07 2002 UTC (11 years, 7 months ago) by kaz
Branch: symlink-branch
Changes since 1.26: +8 -1 lines
Diff to previous 1.26 , to selected 1.12
* generic.lisp (mcvs-generic): Use new mapping-entry data structure.
Filter out mapping entries which are other than of the :file type, so
we don't pass to CVS things it doesn't know about, like symbolic
links.

Revision 1.26 - (view) (annotate) - [select for diffs]
Thu Jul 18 04:49:36 2002 UTC (11 years, 9 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-20, mcvs-0-21, symlink-branch~branch-point
Branch point for: symlink-branch
Changes since 1.25: +15 -9 lines
Diff to previous 1.25 , to selected 1.12
* code/generic.lisp (mcvs-generic): Support new keyword,
:no-fix-empty-file-list. Specifies that if no files are passed,
and the --metaonly option is not present, the CVS command is to be
executed without any file arguments.
(mcvs-commit-wrapper): Specify :no-fix-empty-file-list t when
calling mcvs-generic. Thus commit now has the behavior that
when it is passed no file arguments, it does a true global commit.

Revision 1.25 - (view) (annotate) - [select for diffs]
Sat Jul 6 17:15:02 2002 UTC (11 years, 9 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-18, mcvs-0-19
Changes since 1.24: +2 -1 lines
Diff to previous 1.24 , to selected 1.12
Merging from partial-sandbox-branch.

Revision 1.24.2.1 - (view) (annotate) - [select for diffs]
Sat Jul 6 15:49:12 2002 UTC (11 years, 9 months ago) by kaz
Branch: partial-sandbox-branch
CVS Tags: partial-sandbox-branch~merged-to-HEAD-0
Changes since 1.24: +2 -1 lines
Diff to previous 1.24 , to next main 1.41 , to selected 1.12
* generic.lisp (mcvs-generic): Added path conversions to support
partial sandboxes.

Revision 1.24 - (view) (annotate) - [select for diffs]
Sat Jun 29 15:40:54 2002 UTC (11 years, 9 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-16, mcvs-0-17, partial-sandbox-branch~branch-point
Branch point for: partial-sandbox-branch
Changes since 1.23: +2 -1 lines
Diff to previous 1.23 , to selected 1.12
* generic.lisp (mcvs-tag-wrapper): This one needs to include
meta files by default.

Revision 1.23 - (view) (annotate) - [select for diffs]
Sat Jun 29 14:15:25 2002 UTC (11 years, 9 months ago) by kaz
Branch: MAIN
Changes since 1.22: +27 -17 lines
Diff to previous 1.22 , to selected 1.12
* options.lisp (*nometa-option*): Eliminated rid useless docstring.
(*meta-option*): New variable.
(*nometa-option*): New variable.
(filter-global-options): Clean rewrite using find-bind.

* generic.lisp (mcvs-generic): New keyword parameters
default-include-meta-files, need-update-after. Implements new logic
related to the new options. Performs (mapping-update) if
need-update-after is true and metafiles were subject to cvs update.
(mcvs-commit-wrapper): Calls mcvs-generic with
:default-include-meta-files t.

* update.lisp (mcvs-update): No longer overrides the *nometa-option*
special variable. Passes :need-update-after t to mcvs-generic.

* mcvs-main.lisp (*cvs-options*): New options entered into list.

Revision 1.22 - (view) (annotate) - [select for diffs]
Wed Apr 17 15:13:50 2002 UTC (12 years ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-12, mcvs-0-13, mcvs-0-14, mcvs-0-15, old-convert-hacking-branch~branch-point
Branch point for: old-convert-hacking-branch
Changes since 1.21: +13 -10 lines
Diff to previous 1.21 , to selected 1.12
* generic.lisp (mcvs-generic): Change how empty file argument list
is handled. Rather than rewriting it to '(".") we do a proper
map-prefix-lookup. Synchronizing and invoking CVS is elided
if the resulting list of files to process is empty and the --nometa
option is specified.

Revision 1.21.2.1 - (view) (annotate) - [select for diffs]
Fri Apr 5 00:02:06 2002 UTC (12 years ago) by kaz
Branch: deferred-adds-branch
Changes since 1.21: +0 -3 lines
Diff to previous 1.21 , to next main 1.41 , to selected 1.12
Deferred adds feature, to get around the bug in cvs whereby
one cannot add files and then create a branch and switch to
it and commit them there.

add.lisp (mcvs-add): Do not execute cvs add commands, but instead
save them in a local MCVS metafile called ADD-LOCAL.
(complete-local-adds): New function, performs the deferred adds
and then removes ADD-LOCAL.
(mcvs-commit-wrapper): Function moved here out of generic.lisp.
Calls complete-local-adds before doing the commit.

generlic.lisp (mcvs-commit-wrapper): Function moved to add.lisp.

import.lisp (mcvs-import): Put ADD-LOCAL name under .cvsignore .

mapping.lisp (*mcvs-add-local-name*, *mcvs-add-local*): New
constants.

Revision 1.21 - (view) (annotate) - [select for diffs]
Thu Mar 14 19:03:35 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
CVS Tags: deferred-adds-branch~branch-point, mcvs-0-10, mcvs-0-11, mcvs-0-9
Branch point for: deferred-adds-branch
Changes since 1.20: +6 -2 lines
Diff to previous 1.20 , to selected 1.12
Update takes file arguments now.

* update.lisp (mcvs-update): If filename arguments are given, then
just call mcvs-generic to do the work, but suppress the operation on
meta files. If no filename arguments are given, then update everything.
If the -p option is present, no synchronization is needed, before or
after.
(mcvs-update-wrapper): Pass command arguments down to mcvs-update.

* mcvs-main.lisp (*update-options*): Add "p" option.

* generic.lisp (mcvs-generic): New keyword parameter need-sync-after,
a generalized boolean which can tell the function to do a
mapping-synchronize after executing the CVS command.

Revision 1.20 - (view) (annotate) - [select for diffs]
Wed Mar 13 18:43:39 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
Changes since 1.19: +6 -3 lines
Diff to previous 1.19 , to selected 1.12
* generic.lisp (mcvs-generic): Add .cvsignore to the list of
metafiles.

Revision 1.19 - (view) (annotate) - [select for diffs]
Tue Mar 12 19:54:58 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-8
Changes since 1.18: +3 -3 lines
Diff to previous 1.18 , to selected 1.12
* update.lisp (mcvs-update): Changing level of chatter messages.
* move.lisp (mcvs-move): Likewise.
* add.lisp (mcvs-add): Likewise.
* remove.lisp (mcvs-remove): Likewise.
* checkout.lisp (mcvs-checkout): Likewise.
* generic.lisp (mcvs-generic): Likewise.
* import.lisp (mcvs-import): Likewise.
* mapping.lisp (mapping-dupe-check): Likewise.
(mapping-update): Likewise.

Revision 1.18 - (view) (annotate) - [select for diffs]
Sun Mar 10 03:32:47 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-7
Changes since 1.17: +6 -1 lines
Diff to previous 1.17 , to selected 1.12
Commit is handled through mcvs-generic, so it can take
filename arguments, and honor --nometa.

* commit.lisp: File removed.
(mcvs-commit): Function removed.
(mcvs-commit-wrapper): Moved to generic.lisp.

* generic.lisp (mcvs-commit-wrapper): Moved from commit.lisp,
changed to invoke mcvs-generic.
(mcvs-generic): Only add TYPES file to list if it actually
exists.

Revision 1.17 - (view) (annotate) - [select for diffs]
Sun Mar 10 02:02:49 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
Changes since 1.16: +3 -1 lines
Diff to previous 1.16 , to selected 1.12
New --nometa command line option.

* mcvs-main.lisp (*cvs-options*): Add "nometa" to list.
(mcvs-execute): Filter global options to recognize
Meta-CVS-specific ones.

* options.lisp (*nometa-option*): New special variable.
(filter-global-options): New function.

* generic.lisp (mcvs-generic): Honor *nometa-option* special
variable.

Revision 1.16 - (view) (annotate) - [select for diffs]
Sun Mar 10 01:15:49 2002 UTC (12 years, 1 month ago) by kaz
Branch: MAIN
Changes since 1.15: +1 -1 lines
Diff to previous 1.15 , to selected 1.12
* generic.lisp (mcvs-generic): Make sure TYPES file is
included in list of files.

Revision 1.15 - (view) (annotate) - [select for diffs]
Mon Feb 4 06:40:51 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
CVS Tags: latest-patch, mcvs-0-4, mcvs-0-5, mcvs-0-6
Changes since 1.14: +1 -1 lines
Diff to previous 1.14 , to selected 1.12
Oops, broken tag command.

Revision 1.14 - (view) (annotate) - [select for diffs]
Mon Feb 4 06:21:04 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.13: +9 -0 lines
Diff to previous 1.13 , to selected 1.12
Added status, log and annotate.

* mcvs-main.lisp: (*log-options*, *status-options*,
*annotate-options*): New constants.
(*mcvs-command-table*): Add new entries.

* generic-lisp (mcvs-log-wrapper, mcvs-status-wrapper,
mcvs-annotate-wrapper):  New functions.

Revision 1.13 - (view) (annotate) - [select for diffs]
Mon Feb 4 06:10:53 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.12: +18 -11 lines
Diff to previous 1.12
Added tag command.

* diff.lisp: File renamed to generic.lisp.
(mcvs-diff): Function renamed to mcvs-generic.

* generic.lisp (mcvs-generic): Function no longer dedicated to
diffing only; takes CVS command to execute as an argument,
also takes arguments and files as separate lists.
(mcvs-diff-wrapper): Modified to invoke mcvs-generic properly.
(mcvs-tag-wrapper): New function, uses mcvs-generic to implement
tag command.

* mcvs-main.lisp (*tag-options*): New constant.
(*mcvs-command-table*): New entry for tag command.

Revision 1.12 - (view) (annotate) - [selected]
Sun Feb 3 18:12:10 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.11: +6 -6 lines
Diff to previous 1.11
Added workaround for operating system argument passing limitations,
resembling the Unix xargs utility. Also, trimmed some fat
from the basename function.

* clisp-linux.lisp: (*argument-limit*): New constant added.
(arglist-to-command-string): Function removed.
(execute-program): Function removed.
(shell-interpreter): New function, wrapper for CLISP's shell
function, turns exit status into T (success) or NIL (failure).

* diff.lisp (mcvs-diff): Uses execute-program-xargs instead
of execute-program.

* posix.lisp (basename): Does not canonicalize path name. This
turns out to be an unnecessary performance hit in some cases.
(arglist-to-command-string): New function. Similar to what was
removed from clisp-linux, but this one properly escapes all
shell metacharacters.
(execute-program): New function, calls shell-interpreter.
(execute-program-xargs): New function. Takes two argument lists.
Forms one or more command lines by combining the first argument list
with one or more pieces of the second argument list, and
executes each command. The length of the pieces is determined
by the argument passing limit.

* dirwalk.lisp (ensure-directories-gone): Add use of
canonicalize-path because basename doesn't do it.

Revision 1.11 - (view) (annotate) - [select for diffs]
Fri Feb 1 02:23:46 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-3
Changes since 1.10: +1 -1 lines
Diff to previous 1.10 , to selected 1.12
Renamed all ``filemap-'' functions to ``mapping-'' prefix.

* mapping.lisp (filemap-generate-name, filemap-sort,
filemap-extract-paths, filemap-lookup, filemap-prefix-lookup,
filemap-prefix-matches, filemap-object-lookup,
filemap-same-object-p, filemap-same-path-p, filemap-moved-p,
filemap-rename-files, filemap-sane-p): Old names removed.
(mapping-generate-name, mapping-sort,
mapping-extract-paths, mapping-lookup, mapping-prefix-lookup,
mapping-prefix-matches, mapping-object-lookup,
mapping-same-object-p, mapping-same-path-p, mapping-moved-p,
mapping-rename-files, mapping-sane-p): New names created.
(mapping-read, mapping-write, mapping-synchronize,
mapping-update): Edit calls to renamed functions.
* add.lisp (mcvs-add): Likewise.
* diff.lisp (mcvs-diff): Likewise.
* filt.lisp (mcvs-filt): Likewise.
* import.lisp (mcvs-import): Likewise.
* move.lisp (simple-rename, simple-move-to-dir, move-guts): Likewise.
* remove.lisp (mcvs-remove): Likewise.

Revision 1.10 - (view) (annotate) - [select for diffs]
Thu Jan 31 06:17:50 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-2
Changes since 1.9: +2 -3 lines
Diff to previous 1.9 , to selected 1.12
Factored out repeated code for reading and writing of the MAP and
MAP-LOCAL files.

* mapping.lisp (mapping-read, mapping-write): New functions.
(mapping-synchronize, mapping-update): Use new functions.
* move.lisp (mcvs-move): Likewise.
* filt.lisp (mcvs-filt): Likewise.
* add.lisp (mcvs-add): Likewise.
* remove.lisp (mcvs-remove): Likewise.
* checkout.lisp (mcvs-checkout): Likewise.
* diff.lisp (mcvs-diff): Likewise.
* import.lisp (mcvs-import): Likewise.

Revision 1.9 - (view) (annotate) - [select for diffs]
Thu Jan 31 05:35:02 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.8: +2 -2 lines
Diff to previous 1.8 , to selected 1.12
MCVS is being renamed to Meta-CVS.

Revision 1.8 - (view) (annotate) - [select for diffs]
Sun Jan 27 19:01:19 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
CVS Tags: mcvs-0-0, mcvs-0-1
Changes since 1.7: +1 -0 lines
Diff to previous 1.7 , to selected 1.12
mcvs diff includes MAP file now.

Revision 1.7 - (view) (annotate) - [select for diffs]
Sun Jan 27 16:33:14 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.6: +5 -3 lines
Diff to previous 1.6 , to selected 1.12
First cut at pass-through of CVS options.

Revision 1.6 - (view) (annotate) - [select for diffs]
Sat Jan 26 02:37:53 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
CVS Tags: cvs-options-passthrough
Changes since 1.5: +4 -0 lines
Diff to previous 1.5 , to selected 1.12
Copyright notices.

Revision 1.5 - (view) (annotate) - [select for diffs]
Sat Jan 26 01:55:54 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.4: +1 -1 lines
Diff to previous 1.4 , to selected 1.12
Fix minor problem in diff.

Revision 1.4 - (view) (annotate) - [select for diffs]
Sat Jan 26 01:38:37 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.3: +6 -3 lines
Diff to previous 1.3 , to selected 1.12
Moving closer toward delivery.

Revision 1.3 - (view) (annotate) - [select for diffs]
Fri Jan 25 02:04:45 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.2: +7 -13 lines
Diff to previous 1.2 , to selected 1.12
A bit of refactoring.
Added mcvs-move.

Revision 1.2 - (view) (annotate) - [select for diffs]
Mon Jan 21 07:04:24 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Changes since 1.1: +5 -3 lines
Diff to previous 1.1 , to selected 1.12
Change to some error reporting.

Revision 1.1 - (view) (annotate) - [select for diffs]
Sun Jan 20 20:33:04 2002 UTC (12 years, 2 months ago) by kaz
Branch: MAIN
Diff to selected 1.12
Adding mcvs-diff.

This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.

  Diffs between and
  Type of Diff should be a

Sort log by:

  ViewVC Help
Powered by ViewVC 1.1.5