Mercurial > emacs
comparison lisp/vc-rcs.el @ 94537:e158200330c2
(vc-rcs-state): Fix typos.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Fri, 02 May 2008 03:48:17 +0000 |
parents | a69dcc2c42ae |
children | a0bb8ca25a33 |
comparison
equal
deleted
inserted
replaced
94536:4482905cde4e | 94537:e158200330c2 |
---|---|
116 (progn | 116 (progn |
117 (defun vc-rcs-registered (f) (vc-default-registered 'RCS f))) | 117 (defun vc-rcs-registered (f) (vc-default-registered 'RCS f))) |
118 | 118 |
119 (defun vc-rcs-state (file) | 119 (defun vc-rcs-state (file) |
120 "Implementation of `vc-state' for RCS." | 120 "Implementation of `vc-state' for RCS." |
121 (if (not (vc-rc-registered f)) | 121 (if (not (vc-rcs-registered file)) |
122 'unregistered | 122 'unregistered |
123 (or (boundp 'vc-rcs-headers-result) | 123 (or (boundp 'vc-rcs-headers-result) |
124 (and vc-consult-headers | 124 (and vc-consult-headers |
125 (vc-rcs-consult-headers file))) | 125 (vc-rcs-consult-headers file))) |
126 (let ((state | 126 (let ((state |