emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] externals/psgml c3decf3: * psgml-parse.el: Fix old defadvice in c


From: Stefan Monnier
Subject: [elpa] externals/psgml c3decf3: * psgml-parse.el: Fix old defadvice in comment
Date: Wed, 13 Mar 2019 14:30:35 -0400 (EDT)

branch: externals/psgml
commit c3decf39d2b287f6ec7471aaacf8aee2ca76e08d
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * psgml-parse.el: Fix old defadvice in comment
---
 psgml-parse.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/psgml-parse.el b/psgml-parse.el
index 38dc38b..0522c4f 100644
--- a/psgml-parse.el
+++ b/psgml-parse.el
@@ -49,10 +49,11 @@ The functions is evaluated before the standard auto-fill 
function,
 `do-auto-fill', tries to fill a line.  If the function returns a true
 value the auto-fill is inhibited.")
 
-;;(defadvice do-auto-fill (around disable-auto-fill-hook activate)
+;;(advice-add 'do-auto-fill :around #'sgml--auto-fill-inhibit)
+;;(defun sgml--auto-fill-inhibit (orig-fun &rest args)
 ;;  (or (and sgml-auto-fill-inhibit-function
-;;        (funcall sgml-auto-fill-inhibit-function))
-;;      ad-do-it))
+;;          (funcall sgml-auto-fill-inhibit-function))
+;;      (apply orig-fun args)))
 
 
 ;;;; Variables



reply via email to

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