changeset 55177:144273ac799a

(kill-ring-save): Use blink-matching-delay instead of the constant value 1. (completions-common-part): Expand docstring.
author Juri Linkov <juri@jurta.org>
date Tue, 27 Apr 2004 06:45:49 +0000
parents 6bce3db285b5
children dd3da2fb7ef3
files lisp/simple.el
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Tue Apr 27 06:43:42 2004 +0000
+++ b/lisp/simple.el	Tue Apr 27 06:45:49 2004 +0000
@@ -2148,7 +2148,7 @@
 	      ;; Swap point and mark.
 	      (set-marker (mark-marker) (point) (current-buffer))
 	      (goto-char other-end)
-	      (sit-for 1)
+	      (sit-for blink-matching-delay)
 	      ;; Swap back.
 	      (set-marker (mark-marker) other-end (current-buffer))
 	      (goto-char opoint)
@@ -4258,7 +4258,10 @@
 
 (defface completions-common-part
   '((t (:inherit default)))
-  "Face put on the common prefix substring in completions in *Completions* buffer."
+  "Face put on the common prefix substring in completions in *Completions* buffer.
+The idea of `completions-common-part' is that you can use it to
+make the common parts less visible than normal, so that the rest
+of the differing parts is, by contrast, slightly highlighted."
   :group 'completion)
 
 (defun completion-setup-function ()