diff lisp/simple.el @ 55177:144273ac799a

(kill-ring-save): Use blink-matching-delay instead of the constant value 1. (completions-common-part): Expand docstring.

--- 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 ()