Mercurial > emacs
comparison lib-src/rcs2log @ 12408:67f759e94c3e
(CVSROOT, repository): Allow remote repositories a la CVS 1.4.
author | Paul Eggert <eggert@twinsun.com> |
---|---|
date | Wed, 28 Jun 1995 01:47:55 +0000 |
parents | b9b0b3f96dc2 |
children | da322c027bf0 |
comparison
equal
deleted
inserted
replaced
12407:616493c90878 | 12408:67f759e94c3e |
---|---|
10 # Clump together log entries that start with `{topic} ', | 10 # Clump together log entries that start with `{topic} ', |
11 # where `topic' contains neither white space nor `}'. | 11 # where `topic' contains neither white space nor `}'. |
12 | 12 |
13 # Author: Paul Eggert <eggert@twinsun.com> | 13 # Author: Paul Eggert <eggert@twinsun.com> |
14 | 14 |
15 # $Id: rcs2log,v 1.22 1995/04/30 15:34:52 eggert Exp $ | 15 # $Id: rcs2log,v 1.24 1995/06/28 01:47:55 eggert Exp $ |
16 | 16 |
17 # Copyright 1992, 1993, 1994, 1995 Free Software Foundation, Inc. | 17 # Copyright 1992, 1993, 1994, 1995 Free Software Foundation, Inc. |
18 | 18 |
19 # This program is free software; you can redistribute it and/or modify | 19 # This program is free software; you can redistribute it and/or modify |
20 # it under the terms of the GNU General Public License as published by | 20 # it under the terms of the GNU General Public License as published by |
176 rlog=rlog | 176 rlog=rlog |
177 repository= | 177 repository= |
178 else | 178 else |
179 rlog='cvs log' | 179 rlog='cvs log' |
180 repository=`sed 1q <CVS/Repository` || exit | 180 repository=`sed 1q <CVS/Repository` || exit |
181 case $repository in | 181 test ! -f CVS/Root || CVSROOT=`cat <CVS/Root` || exit |
182 /*) ;; | 182 case ${CVSROOT?} in |
183 *) repository=${CVSROOT?}/$repository | 183 *:/*) |
184 # remote repository | |
185 ;; | |
186 *) | |
187 # local repository | |
188 case $repository in | |
189 /*) ;; | |
190 *) repository=$CVSROOT/$repository | |
191 esac | |
192 if test ! -d "$repository" | |
193 then | |
194 echo >&2 "$0: $repository: bad repository (see CVS/Repository)" | |
195 exit 1 | |
196 fi | |
184 esac | 197 esac |
185 if test ! -d "$repository" | |
186 then | |
187 echo >&2 "$0: $repository: bad repository (see CVS/Repository)" | |
188 exit 1 | |
189 fi | |
190 fi | 198 fi |
191 | 199 |
192 # With no arguments, examine all files under the RCS directory. | 200 # With no arguments, examine all files under the RCS directory. |
193 case $# in | 201 case $# in |
194 0) | 202 0) |