(butlast, event-modifiers, event-basic-type): Doc fixes.
[emacs.git] / lib-src / vcdiff
blob9c513ac82002dddffa4b93328cde45aa4e723793
1 #! /bin/sh
3 # Enhanced sccs diff utility for use with vc mode.
4 # This version is more compatible with rcsdiff(1).
6 # Copyright (C) 1992, 1993, 1995, 1997, 2001, 2004
7 # Free Software Foundation, Inc.
9 # This file is part of GNU Emacs.
11 # GNU Emacs is free software; you can redistribute it and/or modify
12 # it under the terms of the GNU General Public License as published by
13 # the Free Software Foundation; either version 2, or (at your option)
14 # any later version.
16 # GNU Emacs is distributed in the hope that it will be useful,
17 # but WITHOUT ANY WARRANTY; without even the implied warranty of
18 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 # GNU General Public License for more details.
21 # You should have received a copy of the GNU General Public License
22 # along with GNU Emacs; see the file COPYING. If not, write to the
23 # Free Software Foundation, Inc., 59 Temple Place - Suite 330,
24 # Boston, MA 02111-1307, USA.
27 DIFF="diff"
28 usage="$0: Usage: vcdiff [--brief] [-q] [-r<sid1>] [-r<sid2>] [diffopts] sccsfile..."
30 PATH=$PATH:/usr/ccs/bin:/usr/sccs:/usr/xpg4/bin # common SCCS hangouts
32 echo=
33 sid1= sid2=
35 for f
37 case $f in
38 -*)
39 case $f in
40 --brief)
41 DIFF=cmp;;
42 -q)
43 echo=:;;
44 -r?*)
45 case $sid1 in
46 '')
47 sid1=$f
50 case $sid2 in
51 ?*) echo "$usage" >&2; exit 2 ;;
52 esac
53 sid2=$f
55 esac
58 options="$options $f"
60 esac
61 shift
64 break
66 esac
67 done
69 case $# in
71 echo "$usage" >&2
72 exit 2
73 esac
76 rev1= rev2= status=0
77 trap 'status=2; exit' 1 2 13 15
78 trap 'rm -f $rev1 $rev2 || status=2; exit $status' 0
80 for f
82 s=2
84 case $f in
85 s.* | */s.*)
87 rev1=/tmp/geta$$
88 get -s -p -k $sid1 "$f" > $rev1 &&
89 case $sid2 in
90 '')
91 workfile=`expr " /$f" : '.*/s.\(.*\)'`
94 rev2=/tmp/getb$$
95 get -s -p -k $sid2 "$f" > $rev2
96 workfile=$rev2
97 esac
98 then
99 $echo $DIFF $options $sid1 $sid2 $workfile >&2
100 $DIFF $options $rev1 $workfile
101 s=$?
105 echo "$0: $f is not an SCCS file" >&2
106 esac
108 if test $status -lt $s
109 then status=$s
111 done
113 # arch-tag: 4344ba3a-bcbe-4f77-971c-f43c1606953a