(vc-svn-registered): Catch all errors.

[bpt/emacs.git] / lisp / completion.el

diff --git a/lisp/completion.el b/lisp/completion.el
index 4b0f6ca..12df9a5 100644 (file)
--- a/lisp/completion.el
+++ b/lisp/completion.el
@@ -1343,7 +1343,7 @@ String must be longer than `completion-prefix-min-length'."
   (let* ((default (symbol-under-or-before-point))
         (new-prompt
          (if default
-             (format "%s: (default: %s) " prompt default)
+             (format "%s (default %s): " prompt default)
              (format "%s: " prompt)))
         (read (completing-read new-prompt cmpl-obarray)))
     (if (zerop (length read)) (setq read (or default "")))