[Emacs-diffs] master 3ab1784: * lisp/replace.el (query-replace-from-to-separator): Delay initialization

[Glenn Morris]

branch: master
commit 3ab1784327d4d40b3e6bc3a14323740c9a62fa16
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    * lisp/replace.el (query-replace-from-to-separator): Delay initialization
    
    to avoid rogue setting after startup.
---
 lisp/replace.el |   12 +++++-------
 1 files changed, 5 insertions(+), 7 deletions(-)

diff --git a/lisp/replace.el b/lisp/replace.el
index 70b86dd..8e71615 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -68,14 +68,12 @@ to the minibuffer that reads the string to replace, or 
invoke replacements
 from Isearch by using a key sequence like `C-s C-s M-%'." "24.3")
 
 (defcustom query-replace-from-to-separator
-  (propertize
-   (or (ignore-errors
-        ;; Ignore errors when attempt to autoload char-displayable-p
-        ;; fails while preparing to dump.
-        (if (char-displayable-p ?\u2192) " \u2192 " " -> "))
-       " -> ")
-   'face 'minibuffer-prompt)
+  (propertize (if (char-displayable-p ?\u2192) " \u2192 " " -> ")
+              'face 'minibuffer-prompt)
   "String that separates FROM and TO in the history of replacement pairs."
+  ;; Avoids error when attempt to autoload char-displayable-p fails
+  ;; while preparing to dump, also stops customize-rogue listing this.
+  :initialize 'custom-initialize-delay
   :group 'matching
   :type 'sexp
   :version "25.1")