Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5e15f625
Commit
5e15f625
authored
Mar 19, 1993
by
Eric S. Raymond
Browse files
Added documentation, made the change comment for old versions more
useful.
parent
8554321b
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
24 additions
and
1 deletion
+24
-1
lib-src/rcs-checkin
lib-src/rcs-checkin
+24
-1
No files found.
lib-src/rcs-checkin
View file @
5e15f625
#!/bin/sh
# This script accepts any number of file arguments and checks them into RCS.
#
# Arguments which are detectably either RCS masters (with names ending in ,v)
# or Emacs version files (with names of the form foo.~<number>~) are ignored.
# For each file foo, the script looks for Emacs version files related to it.
# These files are checked in as deltas, oldest first, so that the contents of
# the file itself becomes the latest revision in the master.
#
# The first line of each file is used as its description text. The file itself
# is not deleted, as under VC with vc-keep-workfiles at its default of t, but
# all the version files are.
#
# If an argument file is already version-controlled under RCS, any version
# files are added to the list of deltas and deleted, and then the workfile
# is checked in again as the latest version. This is probably not quite
# what was wanted, and is the main reason VC doesn't simply call this to
# do checkins.
#
# This script is intended to be used to convert files with an old-Emacs-style
# version history for use with VC (the Emacs 19 version-control interface),
# which likes to use RCS as its back end. It was written by Paul Eggert
# and revised/documented for use with VC by Eric S. Raymond, Mr 19 1993.
case
$#
in
0
)
echo
"rcs-checkin: usage: rcs-checkin file ..."
...
...
@@ -63,7 +86,7 @@ $file"
mv
"
$oldfile
"
"
$file
"
||
exit
ls_l
=
`
ls
-l
"
$file
"
`
||
exit
owner
=
-w
`
expr
"
$ls_l
"
:
"
$ls_owner_pattern
"
`
||
owner
=
ci
-d
-l
-q
$owner
"
$file
"
</dev/null
||
exit
echo
"Formerly
${
oldfile
}
"
|
ci
-d
-l
-q
$owner
"
$file
"
||
exit
done
# Bring $file back from $file.~-~, and check it in.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment