summaryrefslogtreecommitdiff
path: root/lisp/cus-theme.el
diff options
context:
space:
mode:
authorVibhav Pant <vibhavp@gmail.com>2017-02-13 17:07:36 +0530
committerVibhav Pant <vibhavp@gmail.com>2017-02-13 17:07:36 +0530
commitcb410433e069b5bb450193353c3fea8593a643a9 (patch)
treed2f4269781b4841e5a0c27ec57a5a4fbcec386c0 /lisp/cus-theme.el
parente742450427007cdde242c11380dfe32a950fab61 (diff)
parent4b18ef7ba3dd8aae4f3c3bf931365ef7da883baf (diff)
downloademacs-feature/byte-switch.tar.gz
Merge branch 'master' into feature/byte-switchfeature/byte-switch
Diffstat (limited to 'lisp/cus-theme.el')
-rw-r--r--lisp/cus-theme.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/cus-theme.el b/lisp/cus-theme.el
index c5682add23a..d2ee14d8bdf 100644
--- a/lisp/cus-theme.el
+++ b/lisp/cus-theme.el
@@ -431,7 +431,7 @@ It includes all variables in list VARS."
(if (bolp)
(princ " "))
(princ ")")
- (unless (looking-at "\n")
+ (when (/= (following-char) ?\n)
(princ "\n")))))
(defun custom-theme-write-faces (theme faces)
@@ -463,7 +463,7 @@ It includes all faces in list FACES."
(princ ")")))))
(if (bolp) (princ " "))
(princ ")")
- (unless (looking-at "\n")
+ (when (/= (following-char) ?\n)
(princ "\n")))))