emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 08b2538: -batch should not affect ‘’ -> `' display


From: Paul Eggert
Subject: [Emacs-diffs] master 08b2538: -batch should not affect ‘’ -> `' display
Date: Thu, 02 Jul 2015 16:30:18 +0000

branch: master
commit 08b2538443fc3f483788b12dcb41715a88e40741
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    -batch should not affect ‘’ -> `' display
    
    * lisp/startup.el (command-line): Do the ‘’ -> `' check even if
    -batch (Bug#20926).
---
 lisp/startup.el |   11 +++++------
 1 files changed, 5 insertions(+), 6 deletions(-)

diff --git a/lisp/startup.el b/lisp/startup.el
index 4f1e315..cfe2269 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1018,12 +1018,11 @@ please check its value")
     (setq no-blinking-cursor t))
 
   ;; If curved quotes don't work, display ASCII approximations.
-  (unless noninteractive
-    (dolist (char-repl '((?‘ . [?\`]) (?’ . [?\']) (?“ . [?\"]) (?” . [?\"])))
-      (when (not (char-displayable-p (car char-repl)))
-        (or standard-display-table
-            (setq standard-display-table (make-display-table)))
-        (aset standard-display-table (car char-repl) (cdr char-repl)))))
+  (dolist (char-repl '((?‘ . [?\`]) (?’ . [?\']) (?“ . [?\"]) (?” . [?\"])))
+    (when (not (char-displayable-p (car char-repl)))
+      (or standard-display-table
+          (setq standard-display-table (make-display-table)))
+      (aset standard-display-table (car char-repl) (cdr char-repl))))
 
   ;; Re-evaluate predefined variables whose initial value depends on
   ;; the runtime context.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]