diff options
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/ChangeLog | 28 | ||||
| -rw-r--r-- | lib-src/Makefile.in | 30 | ||||
| -rw-r--r-- | lib-src/make-docfile.c | 4 | ||||
| -rw-r--r-- | lib-src/makefile.w32-in | 20 | ||||
| -rwxr-xr-x | lib-src/rcs-checkin | 116 | ||||
| -rwxr-xr-x | lib-src/vcdiff | 114 |
6 files changed, 34 insertions, 278 deletions
diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog index ff631d09fcd..68a8c37c2fb 100644 --- a/lib-src/ChangeLog +++ b/lib-src/ChangeLog | |||
| @@ -1,3 +1,31 @@ | |||
| 1 | 2012-06-08 Andreas Schwab <schwab@linux-m68k.org> | ||
| 2 | |||
| 3 | * make-docfile.c (search_lisp_doc_at_eol): Unget last read | ||
| 4 | character. | ||
| 5 | |||
| 6 | 2012-06-06 Glenn Morris <rgm@gnu.org> | ||
| 7 | |||
| 8 | * Makefile.in (STAMP_INST_SCRIPTS, STAMP_SCRIPTS, insrcdir) | ||
| 9 | (stamp-rcs2log, stamp-grep-changelog): Remove. | ||
| 10 | (all, clean): Remove references to stamps. | ||
| 11 | |||
| 12 | * vcdiff: Remove file. | ||
| 13 | * Makefile.in (SCRIPTS, STAMP_SCRIPTS): Remove vcdiff. | ||
| 14 | (stamp-vcdiff): Remove. | ||
| 15 | |||
| 16 | 2012-06-05 Glenn Morris <rgm@gnu.org> | ||
| 17 | |||
| 18 | * makefile.w32-in ($(BLD)/getdate.$(O), $(BLD)/leditcfns.$(O)): | ||
| 19 | ($(BLD)/make-path.$(O), $(BLD)/qsort.$(O)): | ||
| 20 | ($(BLD)/timer.$(O)): Remove cruft. | ||
| 21 | |||
| 22 | 2012-06-03 Glenn Morris <rgm@gnu.org> | ||
| 23 | |||
| 24 | * rcs-checkin: Remove file. | ||
| 25 | * Makefile.in (INSTALLABLE_SCRIPTS, STAMP_INST_SCRIPTS): | ||
| 26 | Remove rcs-checkin. | ||
| 27 | (stamp-rcs-checkin): Remove. | ||
| 28 | |||
| 1 | 2012-05-31 Eli Zaretskii <eliz@gnu.org> | 29 | 2012-05-31 Eli Zaretskii <eliz@gnu.org> |
| 2 | 30 | ||
| 3 | * makefile.w32-in ($(BLD)/emacsclientw.exe): Use $(MWINDOWS) | 31 | * makefile.w32-in ($(BLD)/emacsclientw.exe): Use $(MWINDOWS) |
diff --git a/lib-src/Makefile.in b/lib-src/Makefile.in index f1ad84f4d44..2df22d9f7d8 100644 --- a/lib-src/Makefile.in +++ b/lib-src/Makefile.in | |||
| @@ -117,8 +117,7 @@ MKDIR_P = @MKDIR_P@ | |||
| 117 | INSTALLABLES = etags${EXEEXT} ctags${EXEEXT} emacsclient${EXEEXT} \ | 117 | INSTALLABLES = etags${EXEEXT} ctags${EXEEXT} emacsclient${EXEEXT} \ |
| 118 | ebrowse${EXEEXT} | 118 | ebrowse${EXEEXT} |
| 119 | 119 | ||
| 120 | INSTALLABLE_SCRIPTS = rcs-checkin grep-changelog | 120 | INSTALLABLE_SCRIPTS = grep-changelog |
| 121 | STAMP_INST_SCRIPTS = stamp-rcs-checkin stamp-grep-changelog | ||
| 122 | 121 | ||
| 123 | # Things that Emacs runs internally, or during the build process, | 122 | # Things that Emacs runs internally, or during the build process, |
| 124 | # which should not be installed in bindir. | 123 | # which should not be installed in bindir. |
| @@ -129,8 +128,7 @@ DONT_INSTALL= test-distrib${EXEEXT} make-docfile${EXEEXT} | |||
| 129 | 128 | ||
| 130 | # Like UTILITIES, but they're not system-dependent, and should not be | 129 | # Like UTILITIES, but they're not system-dependent, and should not be |
| 131 | # deleted by the distclean target. | 130 | # deleted by the distclean target. |
| 132 | SCRIPTS= rcs2log vcdiff | 131 | SCRIPTS= rcs2log |
| 133 | STAMP_SCRIPTS= stamp-rcs2log stamp-vcdiff | ||
| 134 | 132 | ||
| 135 | # All files that are created by the linker, i.e., whose names end in ${EXEEXT}. | 133 | # All files that are created by the linker, i.e., whose names end in ${EXEEXT}. |
| 136 | EXE_FILES = ${INSTALLABLES} ${UTILITIES} ${DONT_INSTALL} | 134 | EXE_FILES = ${INSTALLABLES} ${UTILITIES} ${DONT_INSTALL} |
| @@ -181,32 +179,11 @@ ALL_CFLAGS = ${BASE_CFLAGS} ${PROFILING_CFLAGS} ${LDFLAGS} ${CPPFLAGS} ${CFLAGS} | |||
| 181 | LINK_CFLAGS = ${BASE_CFLAGS} ${LDFLAGS} ${CFLAGS} | 179 | LINK_CFLAGS = ${BASE_CFLAGS} ${LDFLAGS} ${CFLAGS} |
| 182 | CPP_CFLAGS = ${BASE_CFLAGS} ${PROFILING_CFLAGS} ${CPPFLAGS} ${CFLAGS} | 180 | CPP_CFLAGS = ${BASE_CFLAGS} ${PROFILING_CFLAGS} ${CPPFLAGS} ${CFLAGS} |
| 183 | 181 | ||
| 184 | all: ${EXE_FILES} ${SCRIPTS} ${INSTALLABLE_SCRIPTS} ${STAMP_INST_SCRIPTS} ${STAMP_SCRIPTS} | 182 | all: ${EXE_FILES} ${SCRIPTS} ${INSTALLABLE_SCRIPTS} |
| 185 | 183 | ||
| 186 | LOADLIBES = ../lib/libgnu.a $(LIBS_SYSTEM) | 184 | LOADLIBES = ../lib/libgnu.a $(LIBS_SYSTEM) |
| 187 | $(EXE_FILES): ../lib/libgnu.a | 185 | $(EXE_FILES): ../lib/libgnu.a |
| 188 | 186 | ||
| 189 | ## These targets copy the scripts into the build directory so that | ||
| 190 | ## they can be run from there in an uninstalled Emacs. | ||
| 191 | ## Nothing to do if pwd = srcdir. | ||
| 192 | insrcdir=[ "`/bin/pwd`" = "`cd $(srcdir) && /bin/pwd`" ] | ||
| 193 | |||
| 194 | stamp-rcs2log: $(srcdir)/rcs2log | ||
| 195 | $(insrcdir) || cp -p $(srcdir)/rcs2log rcs2log | ||
| 196 | touch $@ | ||
| 197 | |||
| 198 | stamp-rcs-checkin: $(srcdir)/rcs-checkin | ||
| 199 | $(insrcdir) || cp -p $(srcdir)/rcs-checkin rcs-checkin | ||
| 200 | touch $@ | ||
| 201 | |||
| 202 | stamp-grep-changelog: $(srcdir)/grep-changelog | ||
| 203 | $(insrcdir) || cp -p $(srcdir)/grep-changelog grep-changelog | ||
| 204 | touch $@ | ||
| 205 | |||
| 206 | stamp-vcdiff: $(srcdir)/vcdiff | ||
| 207 | $(insrcdir) || cp -p $(srcdir)/vcdiff vcdiff | ||
| 208 | touch $@ | ||
| 209 | |||
| 210 | ## Only used if we need blessmail, but no harm in always defining. | 187 | ## Only used if we need blessmail, but no harm in always defining. |
| 211 | ## This makes the actual blessmail executable. | 188 | ## This makes the actual blessmail executable. |
| 212 | blessmail: | 189 | blessmail: |
| @@ -281,7 +258,6 @@ mostlyclean: | |||
| 281 | 258 | ||
| 282 | clean: mostlyclean | 259 | clean: mostlyclean |
| 283 | -rm -f ${EXE_FILES} | 260 | -rm -f ${EXE_FILES} |
| 284 | -rm -f ${STAMP_INST_SCRIPTS} ${STAMP_SCRIPTS} | ||
| 285 | 261 | ||
| 286 | distclean: clean | 262 | distclean: clean |
| 287 | -rm -f TAGS | 263 | -rm -f TAGS |
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c index 1314a7b6829..4f68fdb78c9 100644 --- a/lib-src/make-docfile.c +++ b/lib-src/make-docfile.c | |||
| @@ -1025,7 +1025,7 @@ search_lisp_doc_at_eol (FILE *infile) | |||
| 1025 | char c = 0, c1 = 0, c2 = 0; | 1025 | char c = 0, c1 = 0, c2 = 0; |
| 1026 | 1026 | ||
| 1027 | /* Skip until the end of line; remember two previous chars. */ | 1027 | /* Skip until the end of line; remember two previous chars. */ |
| 1028 | while (c != '\n' && c != '\r' && c >= 0) | 1028 | while (c != '\n' && c != '\r' && c != EOF) |
| 1029 | { | 1029 | { |
| 1030 | c2 = c1; | 1030 | c2 = c1; |
| 1031 | c1 = c; | 1031 | c1 = c; |
| @@ -1040,6 +1040,8 @@ search_lisp_doc_at_eol (FILE *infile) | |||
| 1040 | fprintf (stderr, "## non-docstring in %s (%s)\n", | 1040 | fprintf (stderr, "## non-docstring in %s (%s)\n", |
| 1041 | buffer, filename); | 1041 | buffer, filename); |
| 1042 | #endif | 1042 | #endif |
| 1043 | if (c != EOF) | ||
| 1044 | ungetc (c, infile); | ||
| 1043 | return 0; | 1045 | return 0; |
| 1044 | } | 1046 | } |
| 1045 | return 1; | 1047 | return 1; |
diff --git a/lib-src/makefile.w32-in b/lib-src/makefile.w32-in index b727288351a..fea1d29592e 100644 --- a/lib-src/makefile.w32-in +++ b/lib-src/makefile.w32-in | |||
| @@ -387,25 +387,13 @@ $(BLD)/etags.$(O) : \ | |||
| 387 | $(SRC)/ntlib.h \ | 387 | $(SRC)/ntlib.h \ |
| 388 | $(EMACS_ROOT)/lib/getopt.h | 388 | $(EMACS_ROOT)/lib/getopt.h |
| 389 | 389 | ||
| 390 | $(BLD)/getdate.$(O) : \ | ||
| 391 | $(SRC)/getdate.c \ | ||
| 392 | $(EMACS_ROOT)/src/s/ms-w32.h \ | ||
| 393 | $(EMACS_ROOT)/src/config.h \ | ||
| 394 | $(MSTOOLS_SYS)/types.h | ||
| 395 | |||
| 396 | $(BLD)/hexl.$(O) : \ | 390 | $(BLD)/hexl.$(O) : \ |
| 397 | $(SRC)/hexl.c | 391 | $(SRC)/hexl.c |
| 398 | 392 | ||
| 399 | $(BLD)/leditcfns.$(O) : \ | ||
| 400 | $(SRC)/leditcfns.c | ||
| 401 | |||
| 402 | $(BLD)/make-docfile.$(O) : \ | 393 | $(BLD)/make-docfile.$(O) : \ |
| 403 | $(SRC)/make-docfile.c \ | 394 | $(SRC)/make-docfile.c \ |
| 404 | $(EMACS_ROOT)/src/config.h | 395 | $(EMACS_ROOT)/src/config.h |
| 405 | 396 | ||
| 406 | $(BLD)/make-path.$(O) : \ | ||
| 407 | $(SRC)/make-path.c | ||
| 408 | |||
| 409 | $(BLD)/movemail.$(O) : \ | 397 | $(BLD)/movemail.$(O) : \ |
| 410 | $(SRC)/movemail.c \ | 398 | $(SRC)/movemail.c \ |
| 411 | $(EMACS_ROOT)/src/s/ms-w32.h \ | 399 | $(EMACS_ROOT)/src/s/ms-w32.h \ |
| @@ -435,20 +423,12 @@ $(BLD)/profile.$(O) : \ | |||
| 435 | $(EMACS_ROOT)/lib-src/../src/config.h \ | 423 | $(EMACS_ROOT)/lib-src/../src/config.h \ |
| 436 | $(EMACS_ROOT)/lib-src/../src/systime.h | 424 | $(EMACS_ROOT)/lib-src/../src/systime.h |
| 437 | 425 | ||
| 438 | $(BLD)/qsort.$(O) : \ | ||
| 439 | $(SRC)/qsort.c | ||
| 440 | |||
| 441 | $(BLD)/tcp.$(O) : \ | 426 | $(BLD)/tcp.$(O) : \ |
| 442 | $(SRC)/tcp.c | 427 | $(SRC)/tcp.c |
| 443 | 428 | ||
| 444 | $(BLD)/test-distrib.$(O) : \ | 429 | $(BLD)/test-distrib.$(O) : \ |
| 445 | $(SRC)/test-distrib.c | 430 | $(SRC)/test-distrib.c |
| 446 | 431 | ||
| 447 | $(BLD)/timer.$(O) : \ | ||
| 448 | $(SRC)/timer.c \ | ||
| 449 | $(EMACS_ROOT)/src/s/ms-w32.h \ | ||
| 450 | $(EMACS_ROOT)/lib-src/../src/config.h | ||
| 451 | |||
| 452 | # The following dependencies are for supporting parallel builds, where | 432 | # The following dependencies are for supporting parallel builds, where |
| 453 | # we must make sure $(BLD) exists before any compilation starts. | 433 | # we must make sure $(BLD) exists before any compilation starts. |
| 454 | # | 434 | # |
diff --git a/lib-src/rcs-checkin b/lib-src/rcs-checkin deleted file mode 100755 index 57e91becf9d..00000000000 --- a/lib-src/rcs-checkin +++ /dev/null | |||
| @@ -1,116 +0,0 @@ | |||
| 1 | #! /bin/sh | ||
| 2 | |||
| 3 | # This script accepts any number of file arguments and checks them into RCS. | ||
| 4 | |||
| 5 | # Copyright (C) 1993-1995, 2001-2012 Free Software Foundation, Inc. | ||
| 6 | |||
| 7 | # This file is part of GNU Emacs. | ||
| 8 | |||
| 9 | # GNU Emacs is free software: you can redistribute it and/or modify | ||
| 10 | # it under the terms of the GNU General Public License as published by | ||
| 11 | # the Free Software Foundation, either version 3 of the License, or | ||
| 12 | # (at your option) any later version. | ||
| 13 | |||
| 14 | # GNU Emacs is distributed in the hope that it will be useful, | ||
| 15 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 16 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 17 | # GNU General Public License for more details. | ||
| 18 | |||
| 19 | # You should have received a copy of the GNU General Public License | ||
| 20 | # along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. | ||
| 21 | |||
| 22 | |||
| 23 | # Arguments which are detectably either RCS masters (with names ending in ,v) | ||
| 24 | # or Emacs version files (with names of the form foo.~<number>~) are ignored. | ||
| 25 | # For each file foo, the script looks for Emacs version files related to it. | ||
| 26 | # These files are checked in as deltas, oldest first, so that the contents of | ||
| 27 | # the file itself becomes the latest revision in the master. | ||
| 28 | # | ||
| 29 | # The first line of each file is used as its description text. The file itself | ||
| 30 | # is not deleted, as under VC with vc-keep-workfiles at its default of t, but | ||
| 31 | # all the version files are. | ||
| 32 | # | ||
| 33 | # If an argument file is already version-controlled under RCS, any version | ||
| 34 | # files are added to the list of deltas and deleted, and then the workfile | ||
| 35 | # is checked in again as the latest version. This is probably not quite | ||
| 36 | # what was wanted, and is the main reason VC doesn't simply call this to | ||
| 37 | # do checkins. | ||
| 38 | # | ||
| 39 | # This script is intended to be used to convert files with an old-Emacs-style | ||
| 40 | # version history for use with VC (the Emacs 19 version-control interface), | ||
| 41 | # which likes to use RCS as its back end. It was written by Paul Eggert | ||
| 42 | # and revised/documented for use with VC by Eric S. Raymond, Mar 19 1993. | ||
| 43 | |||
| 44 | case $# in | ||
| 45 | 0) | ||
| 46 | echo "rcs-checkin: usage: rcs-checkin file ..." | ||
| 47 | echo "rcs-checkin: function: checks file.~*~ and file into a new RCS file" | ||
| 48 | echo "rcs-checkin: function: uses the file's first line for the description" | ||
| 49 | esac | ||
| 50 | |||
| 51 | # expr pattern to extract owner from ls -l output | ||
| 52 | ls_owner_pattern='[^ ][^ ]* *[^ ][^ ]* *\([^ ][^ ]*\)' | ||
| 53 | |||
| 54 | for file | ||
| 55 | do | ||
| 56 | # Make it easier to say `rcs-checkin *' | ||
| 57 | # by ignoring file names that already contain `~', or end in `,v'. | ||
| 58 | case $file in | ||
| 59 | *~* | *,v) continue | ||
| 60 | esac | ||
| 61 | # Ignore non-files too. | ||
| 62 | test -f "$file" || continue | ||
| 63 | |||
| 64 | # Check that file is readable. | ||
| 65 | test -r "$file" || exit | ||
| 66 | |||
| 67 | # If the RCS file does not already exist, | ||
| 68 | # initialize it with a description from $file's first line. | ||
| 69 | rlog -R "$file" >/dev/null 2>&1 || | ||
| 70 | rcs -i -q -t-"`sed 1q $file`" "$file" || exit | ||
| 71 | |||
| 72 | # Get list of old files. | ||
| 73 | oldfiles=` | ||
| 74 | ls $file.~[0-9]*~ 2>/dev/null | | ||
| 75 | sort -t~ -n -k 2 | ||
| 76 | ` | ||
| 77 | |||
| 78 | # Check that they are properly sorted by date. | ||
| 79 | case $oldfiles in | ||
| 80 | ?*) | ||
| 81 | oldfiles_by_date=`ls -rt $file $oldfiles` | ||
| 82 | test " $oldfiles | ||
| 83 | $file" = " $oldfiles_by_date" || { | ||
| 84 | echo >&2 "rcs-checkin: skipping $file, because its mod times are out of order. | ||
| 85 | |||
| 86 | Sorted by mod time: | ||
| 87 | $oldfiles_by_date | ||
| 88 | |||
| 89 | Sorted by name: | ||
| 90 | $oldfiles | ||
| 91 | $file" | ||
| 92 | continue | ||
| 93 | } | ||
| 94 | esac | ||
| 95 | |||
| 96 | echo >&2 rcs-checkin: checking in: $oldfiles $file | ||
| 97 | |||
| 98 | # Save $file as $file.~-~ temporarily. | ||
| 99 | mv "$file" "$file.~-~" || exit | ||
| 100 | |||
| 101 | # Rename each old file to $file, and check it in. | ||
| 102 | for oldfile in $oldfiles | ||
| 103 | do | ||
| 104 | mv "$oldfile" "$file" || exit | ||
| 105 | ls_l=`ls -l "$file"` || exit | ||
| 106 | owner=-w`expr " $ls_l" : " $ls_owner_pattern"` || owner= | ||
| 107 | echo "Formerly ${oldfile}" | ci -d -l -q $owner "$file" || exit | ||
| 108 | done | ||
| 109 | |||
| 110 | # Bring $file back from $file.~-~, and check it in. | ||
| 111 | mv "$file.~-~" "$file" || exit | ||
| 112 | ls_l=`ls -l "$file"` || exit | ||
| 113 | owner=-w`expr " $ls_l" : " $ls_owner_pattern"` || owner= | ||
| 114 | ci -d -q -u $owner -m"entered into RCS" "$file" || exit | ||
| 115 | done | ||
| 116 | |||
diff --git a/lib-src/vcdiff b/lib-src/vcdiff deleted file mode 100755 index dd7ca446d7c..00000000000 --- a/lib-src/vcdiff +++ /dev/null | |||
| @@ -1,114 +0,0 @@ | |||
| 1 | #! /bin/sh | ||
| 2 | |||
| 3 | # Enhanced sccs diff utility for use with vc mode. | ||
| 4 | # This version is more compatible with rcsdiff(1). | ||
| 5 | |||
| 6 | # Copyright (C) 1992-1993, 1995, 1997, 2001-2012 | ||
| 7 | # Free Software Foundation, Inc. | ||
| 8 | |||
| 9 | # Author: Paul Eggert | ||
| 10 | # (according to authors.el) | ||
| 11 | |||
| 12 | # This file is part of GNU Emacs. | ||
| 13 | |||
| 14 | # GNU Emacs is free software: you can redistribute it and/or modify | ||
| 15 | # it under the terms of the GNU General Public License as published by | ||
| 16 | # the Free Software Foundation, either version 3 of the License, or | ||
| 17 | # (at your option) any later version. | ||
| 18 | |||
| 19 | # GNU Emacs is distributed in the hope that it will be useful, | ||
| 20 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 21 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 22 | # GNU General Public License for more details. | ||
| 23 | |||
| 24 | # You should have received a copy of the GNU General Public License | ||
| 25 | # along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. | ||
| 26 | |||
| 27 | |||
| 28 | DIFF="diff" | ||
| 29 | usage="$0: Usage: vcdiff [--brief] [-q] [-r<sid1>] [-r<sid2>] [diffopts] sccsfile..." | ||
| 30 | |||
| 31 | # Now that we use `sccs get' rather than just `get', we don't need this. | ||
| 32 | # PATH=$PATH:/usr/ccs/bin:/usr/sccs:/usr/xpg4/bin # common SCCS hangouts | ||
| 33 | |||
| 34 | echo="echo" | ||
| 35 | sid1= sid2= | ||
| 36 | |||
| 37 | for f | ||
| 38 | do | ||
| 39 | case $f in | ||
| 40 | -*) | ||
| 41 | case $f in | ||
| 42 | --brief) | ||
| 43 | DIFF=cmp;; | ||
| 44 | -q) | ||
| 45 | echo=:;; | ||
| 46 | -r?*) | ||
| 47 | case $sid1 in | ||
| 48 | '') | ||
| 49 | sid1=$f | ||
| 50 | ;; | ||
| 51 | *) | ||
| 52 | case $sid2 in | ||
| 53 | ?*) echo "$usage" >&2; exit 2 ;; | ||
| 54 | esac | ||
| 55 | sid2=$f | ||
| 56 | ;; | ||
| 57 | esac | ||
| 58 | ;; | ||
| 59 | *) | ||
| 60 | options="$options $f" | ||
| 61 | ;; | ||
| 62 | esac | ||
| 63 | shift | ||
| 64 | ;; | ||
| 65 | *) | ||
| 66 | break | ||
| 67 | ;; | ||
| 68 | esac | ||
| 69 | done | ||
| 70 | |||
| 71 | case $# in | ||
| 72 | 0) | ||
| 73 | echo "$usage" >&2 | ||
| 74 | exit 2 | ||
| 75 | esac | ||
| 76 | |||
| 77 | |||
| 78 | rev1= rev2= status=0 | ||
| 79 | trap 'status=2; exit' 1 2 13 15 | ||
| 80 | trap 'rm -f $rev1 $rev2 || status=2; exit $status' 0 | ||
| 81 | |||
| 82 | for f | ||
| 83 | do | ||
| 84 | s=2 | ||
| 85 | |||
| 86 | case $f in | ||
| 87 | s.* | */s.*) | ||
| 88 | if | ||
| 89 | rev1=`mktemp /tmp/geta.XXXXXXXX` | ||
| 90 | sccs get -s -p -k $sid1 "$f" > $rev1 && | ||
| 91 | case $sid2 in | ||
| 92 | '') | ||
| 93 | workfile=`expr " /$f" : '.*/s.\(.*\)'` | ||
| 94 | ;; | ||
| 95 | *) | ||
| 96 | rev2=`mktemp /tmp/getb.XXXXXXXX` | ||
| 97 | sccs get -s -p -k $sid2 "$f" > $rev2 | ||
| 98 | workfile=$rev2 | ||
| 99 | esac | ||
| 100 | then | ||
| 101 | $echo $DIFF $options $rev1 $workfile >&2 | ||
| 102 | $DIFF $options $rev1 $workfile | ||
| 103 | s=$? | ||
| 104 | fi | ||
| 105 | ;; | ||
| 106 | *) | ||
| 107 | echo "$0: $f is not an SCCS file" >&2 | ||
| 108 | esac | ||
| 109 | |||
| 110 | if test $status -lt $s | ||
| 111 | then status=$s | ||
| 112 | fi | ||
| 113 | done | ||
| 114 | |||