* lisp/textmodes/text-mode.el (paragraph-indent-minor-mode): Use add-function.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a749f70b4fc2e0e0fa25a44aa3ec8098e62f7c94..e2d1747795c91ff8b9c21a964b978efa74b3d43e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-11-18  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * textmodes/text-mode.el (paragraph-indent-minor-mode): Use add-function.
+
 2013-11-17  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * emacs-lisp/nadvice.el (remove-function): Align with

diff --git a/lisp/textmodes/text-mode.el b/lisp/textmodes/text-mode.el
index a045af8522fd645c1027e2e33f154fa5f86506f2..6c97ce6372bcf79fad0ed98a27fdad2bfdb789ff 100644 (file)
--- a/lisp/textmodes/text-mode.el
+++ b/lisp/textmodes/text-mode.el
@@ -121,9 +121,10 @@ Turning on Paragraph-Indent minor mode runs the normal hook
                (concat ps-re paragraph-start)))))
   ;; Change the indentation function.
   (if paragraph-indent-minor-mode
-      (set (make-local-variable 'indent-line-function) 'indent-to-left-margin)
-    (if (eq indent-line-function 'indent-to-left-margin)
-        (set (make-local-variable 'indent-line-function) 'indent-region))))
+      (add-function :override (local 'indent-line-function)
+                    #'indent-to-left-margin)
+    (remove-function (local 'indent-line-function)
+                     #'indent-to-left-margin)))
 
 (defalias 'indented-text-mode 'text-mode)