Mercurial > emacs
changeset 4024:b9f3b023e5c9
(vc-rcs-status): Remove unused var `status'.
| author | Paul Eggert <eggert@twinsun.com> |
|---|---|
| date | Wed, 07 Jul 1993 19:07:54 +0000 |
| parents | 5e4f918d5d44 |
| children | 92cd14c9ea80 |
| files | lisp/vc-hooks.el |
| diffstat | 1 files changed, 5 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-hooks.el Wed Jul 07 18:40:35 1993 +0000 +++ b/lisp/vc-hooks.el Wed Jul 07 19:07:54 1993 +0000 @@ -1,6 +1,6 @@ ;;; vc-hooks.el --- resident support for version-control -;; Copyright (C) 1992 Free Software Foundation, Inc. +;; Copyright (C) 1992, 1993 Free Software Foundation, Inc. ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Version: 5.3 @@ -166,12 +166,10 @@ ;; 2. Insert the first few characters of the master file into a work ;; buffer. ;; - ;; 3. Search work buffer for line starting with "date" indicating enough - ;; of header was included; if not found, then keep inserting characters - ;; until "date" is located. + ;; 3. Search work buffer for "locks...;" phrase; if not found, then + ;; keep inserting more characters until the phrase is found. ;; - ;; 4. Search work buffer for line starting with "locks", extract - ;; all the locks currently enabled, and remove control characters + ;; 4. Extract the locks, and remove control characters ;; separating them, like newlines; the string " user1:revision1 ;; user2:revision2 ..." is returned. @@ -181,7 +179,7 @@ ;; The modeline can get quite cluttered when there are multiple locks. (let ((master (vc-name file)) - found status) + found) ;; If master file exists, then parse its contents, otherwise we return the ;; nil value of this if form.