Disable whitespace-newline-mode properly.

diff --git a/etc/images/icons/allout-widgets/light-bg/locked-encrypted.png b/etc/images/icons/allout-widgets/light-bg/locked-encrypted.png
old mode 100644 (file)
new mode 100755 (executable)

diff --git a/etc/images/icons/allout-widgets/light-bg/unlocked-encrypted.png b/etc/images/icons/allout-widgets/light-bg/unlocked-encrypted.png
old mode 100644 (file)
new mode 100755 (executable)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e65029b..74d578a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-10-30  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
+
+       * whitespace.el: New version 13.2.2.
+       (whitespace-newline-mode): Disable properly.  Reported by Sarah
+       <EmacsWiki>.
+
 2011-10-30  Ulf Jasper  <ulf.jasper@web.de>
 
        * net/newst-treeview.el: Remove "Time-stamp".

diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index 8dc1996..3cbc41e 100644 (file)
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -5,7 +5,7 @@
 ;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br>
 ;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br>
 ;; Keywords: data, wp
-;; Version: 13.2.1
+;; Version: 13.2.2
 ;; X-URL: http://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
 
 ;; This file is part of GNU Emacs.
@@ -1102,10 +1102,14 @@ See also `whitespace-newline' and `whitespace-display-mappings'."
   :init-value nil
   :global     nil
   :group      'whitespace
-  (let ((whitespace-style '(face newline-mark newline)))
-    (whitespace-mode (if whitespace-newline-mode 1 -1))
-    ;; Sync states (running a batch job).
-    (setq whitespace-newline-mode whitespace-mode)))
+  (cond
+   (whitespace-newline-mode
+    (let ((whitespace-style '(face newline-mark newline)))
+      (whitespace-mode whitespace-newline-mode)))
+   (t
+    (whitespace-mode -1)))
+  ;; sync states (running a batch job)
+  (setq whitespace-newline-mode whitespace-mode))
 
 \f
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;