emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r110257: Remove duplication of vc-scc


From: Glenn Morris
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r110257: Remove duplication of vc-sccs-registered definition
Date: Sat, 29 Sep 2012 16:21:57 -0700
User-agent: Bazaar (2.5.0)

------------------------------------------------------------
revno: 110257
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sat 2012-09-29 16:21:57 -0700
message:
  Remove duplication of vc-sccs-registered definition
  
  * lisp/vc/vc-sccs.el (vc-sccs-registered): Use the progn trick to get
  the full definition in loaddefs, rather than duplicating it.
  Cf vc-rcs-registered.
modified:
  lisp/ChangeLog
  lisp/vc/vc-sccs.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-09-29 19:19:17 +0000
+++ b/lisp/ChangeLog    2012-09-29 23:21:57 +0000
@@ -1,5 +1,8 @@
 2012-09-29  Glenn Morris  <address@hidden>
 
+       * vc/vc-sccs.el (vc-sccs-registered): Use the progn trick to get
+       the full definition in loaddefs, rather than duplicating it.
+
        * help-macro.el (three-step-help): No need to autoload defcustom.
 
        * progmodes/inf-lisp.el (inferior-lisp-filter-regexp)

=== modified file 'lisp/vc/vc-sccs.el'
--- a/lisp/vc/vc-sccs.el        2012-09-29 23:18:33 +0000
+++ b/lisp/vc/vc-sccs.el        2012-09-29 23:21:57 +0000
@@ -107,13 +107,12 @@
 ;;; State-querying functions
 ;;;
 
-;; The autoload cookie below places vc-sccs-registered directly into
-;; loaddefs.el, so that vc-sccs.el does not need to be loaded for
-;; every file that is visited.  The definition is repeated below
-;; so that Help and etags can find it.
-
-;;;###autoload (defun vc-sccs-registered(f) (vc-default-registered 'SCCS f))
-(defun vc-sccs-registered (f) (vc-default-registered 'SCCS f))
+;; The autoload cookie below places vc-rcs-registered directly into
+;; loaddefs.el, so that vc-rcs.el does not need to be loaded for
+;; every file that is visited.
+;;;###autoload
+(progn
+(defun vc-sccs-registered (f) (vc-default-registered 'SCCS f)))
 
 (defun vc-sccs-state (file)
   "SCCS-specific function to compute the version control state."


reply via email to

[Prev in Thread] Current Thread [Next in Thread]