diff 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
line wrap: on
line diff
--- a/lib-src/rcs2log	Wed Jun 28 00:26:25 1995 +0000
+++ b/lib-src/rcs2log	Wed Jun 28 01:47:55 1995 +0000
@@ -12,7 +12,7 @@
 
 # Author: Paul Eggert <eggert@twinsun.com>
 
-# $Id: rcs2log,v 1.22 1995/04/30 15:34:52 eggert Exp $
+# $Id: rcs2log,v 1.24 1995/06/28 01:47:55 eggert Exp $
 
 # Copyright 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
 
@@ -178,15 +178,23 @@
 else
 	rlog='cvs log'
 	repository=`sed 1q <CVS/Repository` || exit
-	case $repository in
-	/*) ;;
-	*) repository=${CVSROOT?}/$repository
+	test ! -f CVS/Root || CVSROOT=`cat <CVS/Root` || exit
+	case ${CVSROOT?} in
+	*:/*)
+		# remote repository
+		;;
+	*)
+		# local repository
+		case $repository in
+		/*) ;;
+		*) repository=$CVSROOT/$repository
+		esac
+		if test ! -d "$repository"
+		then
+			echo >&2 "$0: $repository: bad repository (see CVS/Repository)"
+			exit 1
+		fi
 	esac
-	if test ! -d "$repository"
-	then
-		echo >&2 "$0: $repository: bad repository (see CVS/Repository)"
-		exit 1
-	fi
 fi
 
 # With no arguments, examine all files under the RCS directory.