aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEric S. Raymond2010-04-09 13:19:53 -0400
committerEric S. Raymond2010-04-09 13:19:53 -0400
commit004f9b3f1bf1fdf09c457cd30ea5e377d653a470 (patch)
tree64e663ab2bed79b434a44eb054f70bbc8e03c8c4
parentb13aef54997edcdceae7dab09a979f5833e6285d (diff)
downloademacs-004f9b3f1bf1fdf09c457cd30ea5e377d653a470.tar.gz
emacs-004f9b3f1bf1fdf09c457cd30ea5e377d653a470.zip
Get rid of several uses of the term 'master' in favor of equivalent verbiage
using "repository". No code changes.
-rw-r--r--lisp/dired.el2
-rw-r--r--lisp/emacs-lisp/cl-loaddefs.el2
-rw-r--r--lisp/vc-arch.el3
-rw-r--r--lisp/vc-hooks.el10
-rw-r--r--lisp/vc.el27
5 files changed, 25 insertions, 19 deletions
diff --git a/lisp/dired.el b/lisp/dired.el
index c3d1435401e..0dc53bf32c4 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -3974,7 +3974,7 @@ true then the type of the file linked to by FILE is printed instead.
3974;;;*** 3974;;;***
3975 3975
3976;;;### (autoloads (dired-do-relsymlink dired-jump) "dired-x" "dired-x.el" 3976;;;### (autoloads (dired-do-relsymlink dired-jump) "dired-x" "dired-x.el"
3977;;;;;; "bb37ec379c0a523368794491b691fd8d") 3977;;;;;; "2f8d3d5a31b969b181e23c40d6bb16a0")
3978;;; Generated autoloads from dired-x.el 3978;;; Generated autoloads from dired-x.el
3979 3979
3980(autoload 'dired-jump "dired-x" "\ 3980(autoload 'dired-jump "dired-x" "\
diff --git a/lisp/emacs-lisp/cl-loaddefs.el b/lisp/emacs-lisp/cl-loaddefs.el
index bdae05e7774..83247b62135 100644
--- a/lisp/emacs-lisp/cl-loaddefs.el
+++ b/lisp/emacs-lisp/cl-loaddefs.el
@@ -282,7 +282,7 @@ Not documented
282;;;;;; flet progv psetq do-all-symbols do-symbols dotimes dolist 282;;;;;; flet progv psetq do-all-symbols do-symbols dotimes dolist
283;;;;;; do* do loop return-from return block etypecase typecase ecase 283;;;;;; do* do loop return-from return block etypecase typecase ecase
284;;;;;; case load-time-value eval-when destructuring-bind function* 284;;;;;; case load-time-value eval-when destructuring-bind function*
285;;;;;; defmacro* defun* gentemp gensym) "cl-macs" "cl-macs.el" "273ba25f4a116c61a464dbe55f1f8c63") 285;;;;;; defmacro* defun* gentemp gensym) "cl-macs" "cl-macs.el" "7fad7dd60f2f96ba90432f885015d61b")
286;;; Generated autoloads from cl-macs.el 286;;; Generated autoloads from cl-macs.el
287 287
288(autoload 'gensym "cl-macs" "\ 288(autoload 'gensym "cl-macs" "\
diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el
index 80629ec0b4b..a723f98b8ae 100644
--- a/lisp/vc-arch.el
+++ b/lisp/vc-arch.el
@@ -254,8 +254,7 @@ Only the value `maybe' can be trusted :-(."
254 (buffer-substring (point-min) (1- (point-max))))))))) 254 (buffer-substring (point-min) (1- (point-max)))))))))
255 255
256(defun vc-arch-workfile-unchanged-p (file) 256(defun vc-arch-workfile-unchanged-p (file)
257 "Check if FILE is unchanged by diffing against the master version. 257 "Stub: arch workfiles are always considered to be in a changed state,"
258Return non-nil if FILE is unchanged."
259 nil) 258 nil)
260 259
261(defun vc-arch-state (file) 260(defun vc-arch-state (file)
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index eb8b4e015a7..ab9972a7e44 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -396,7 +396,7 @@ If the argument is a list, the files must all have the same back end."
396 396
397 397
398(defun vc-backend-subdirectory-name (file) 398(defun vc-backend-subdirectory-name (file)
399 "Return where the master and lock FILEs for the current directory are kept." 399 "Return where the repository for the current directory is kept."
400 (symbol-name (vc-backend file))) 400 (symbol-name (vc-backend file)))
401 401
402(defun vc-name (file) 402(defun vc-name (file)
@@ -467,13 +467,13 @@ For registered files, the value returned is one of:
467 USER The current version of the working file is locked by 467 USER The current version of the working file is locked by
468 some other USER (a string). 468 some other USER (a string).
469 469
470 'needs-update The file has not been edited by the user, but there is 470 'needs-update The file has not been edited by the user, but there is
471 a more recent version on the current branch stored 471 a more recent version on the current branch stored
472 in the master file. 472 in the repository.
473 473
474 'needs-merge The file has been edited by the user, and there is also 474 'needs-merge The file has been edited by the user, and there is also
475 a more recent version on the current branch stored in 475 a more recent version on the current branch stored in
476 the master file. This state can only occur if locking 476 the repository. This state can only occur if locking
477 is not used for the file. 477 is not used for the file.
478 478
479 'unlocked-changes The working version of the file is not locked, 479 'unlocked-changes The working version of the file is not locked,
@@ -552,7 +552,7 @@ and does not employ any heuristic at all."
552 unchanged)))) 552 unchanged))))
553 553
554(defun vc-default-workfile-unchanged-p (backend file) 554(defun vc-default-workfile-unchanged-p (backend file)
555 "Check if FILE is unchanged by diffing against the master version. 555 "Check if FILE is unchanged by diffing against the repository version.
556Return non-nil if FILE is unchanged." 556Return non-nil if FILE is unchanged."
557 (zerop (condition-case err 557 (zerop (condition-case err
558 ;; If the implementation supports it, let the output 558 ;; If the implementation supports it, let the output
diff --git a/lisp/vc.el b/lisp/vc.el
index 6833bae7c92..4bf5a92da1b 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -63,11 +63,18 @@
63;; although you might prefer to use C-c C-a (i.e. `log-edit-insert-changelog') 63;; although you might prefer to use C-c C-a (i.e. `log-edit-insert-changelog')
64;; from the commit buffer instead or to set `log-edit-setup-invert'. 64;; from the commit buffer instead or to set `log-edit-setup-invert'.
65;; 65;;
66;; The vc code maintains some internal state in order to reduce expensive 66;; When using SCCS, RCS, CVS: be careful not to do repo surgery, or
67;; version-control operations to a minimum. Some names are only computed 67;; operations like registrations and deletions and renames, outside VC
68;; once. If you perform version control operations with the backend while 68;; while VC is running. The support for these systems was designed
69;; vc's back is turned, or move/rename master files while vc is running, 69;; when disks were much slower, and the code maintains a lot of
70;; vc may get seriously confused. Don't do these things! 70;; internal state in order to reduce expensive operations to a
71;; minimum. Thus, if you mess with the repo while VC's back is turned,
72;; VC may get seriously confused.
73;;
74;; When using Subversion or a later system, anything you do outside VC
75;; *through the VCS tools* should safely interlock with VC
76;; operations. Under these VC does little state caching, because local
77;; operations are assumed to be fast. The dividing line is
71;; 78;;
72;; ADDING SUPPORT FOR OTHER BACKENDS 79;; ADDING SUPPORT FOR OTHER BACKENDS
73;; 80;;
@@ -196,7 +203,7 @@
196;; 203;;
197;; Return non-nil if FILE is unchanged from the working revision. 204;; Return non-nil if FILE is unchanged from the working revision.
198;; This function should do a brief comparison of FILE's contents 205;; This function should do a brief comparison of FILE's contents
199;; with those of the repository master of the working revision. If 206;; with those of the repository copy of the working revision. If
200;; the backend does not have such a brief-comparison feature, the 207;; the backend does not have such a brief-comparison feature, the
201;; default implementation of this function can be used, which 208;; default implementation of this function can be used, which
202;; delegates to a full vc-BACKEND-diff. (Note that vc-BACKEND-diff 209;; delegates to a full vc-BACKEND-diff. (Note that vc-BACKEND-diff
@@ -784,7 +791,7 @@ is sensitive to blank lines."
784(defcustom vc-checkout-carefully (= (user-uid) 0) 791(defcustom vc-checkout-carefully (= (user-uid) 0)
785 "Non-nil means be extra-careful in checkout. 792 "Non-nil means be extra-careful in checkout.
786Verify that the file really is not locked 793Verify that the file really is not locked
787and that its contents match what the master file says." 794and that its contents match what the repository version says."
788 :type 'boolean 795 :type 'boolean
789 :group 'vc) 796 :group 'vc)
790(make-obsolete-variable 'vc-checkout-carefully 797(make-obsolete-variable 'vc-checkout-carefully
@@ -1518,7 +1525,7 @@ returns t if the buffer had changes, nil otherwise."
1518 (not (string= (vc-working-revision file) "0"))) 1525 (not (string= (vc-working-revision file) "0")))
1519 (push file filtered) 1526 (push file filtered)
1520 ;; This file is added but not yet committed; 1527 ;; This file is added but not yet committed;
1521 ;; there is no master file to diff against. 1528 ;; there is no repository version to diff against.
1522 (if (or rev1 rev2) 1529 (if (or rev1 rev2)
1523 (error "No revisions of %s exist" file) 1530 (error "No revisions of %s exist" file)
1524 ;; We regard this as "changed". 1531 ;; We regard this as "changed".
@@ -2318,7 +2325,7 @@ backend to NEW-BACKEND, and unregister FILE from the current backend.
2318 (if unmodified-file 2325 (if unmodified-file
2319 (copy-file unmodified-file file 2326 (copy-file unmodified-file file
2320 'ok-if-already-exists 'keep-date) 2327 'ok-if-already-exists 'keep-date)
2321 (when (y-or-n-p "Get base revision from master? ") 2328 (when (y-or-n-p "Get base revision from repository? ")
2322 (vc-revert-file file)))) 2329 (vc-revert-file file))))
2323 (vc-call-backend new-backend 'receive-file file rev)) 2330 (vc-call-backend new-backend 'receive-file file rev))
2324 (when modified-file 2331 (when modified-file
@@ -2405,7 +2412,7 @@ backend to NEW-BACKEND, and unregister FILE from the current backend.
2405 2412
2406;;;###autoload 2413;;;###autoload
2407(defun vc-rename-file (old new) 2414(defun vc-rename-file (old new)
2408 "Rename file OLD to NEW, and rename its master file likewise." 2415 "Rename file OLD to NEW in both work area and repository."
2409 (interactive "fVC rename file: \nFRename to: ") 2416 (interactive "fVC rename file: \nFRename to: ")
2410 ;; in CL I would have said (setq new (merge-pathnames new old)) 2417 ;; in CL I would have said (setq new (merge-pathnames new old))
2411 (let ((old-base (file-name-nondirectory old))) 2418 (let ((old-base (file-name-nondirectory old)))