bug-gnu-emacs
[Top][All Lists]
Advanced

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

bug#4548: marked as done (23.1.50; hideshow.el - hs-show-block does not


From: Emacs bug Tracking System
Subject: bug#4548: marked as done (23.1.50; hideshow.el - hs-show-block does not run hs-show-hook)
Date: Fri, 25 Sep 2009 00:40:05 +0000

Your message dated Fri, 25 Sep 2009 02:33:10 +0200
with message-id <address@hidden>
and subject line Re: bug#4548: 23.1.50; hideshow.el - hs-show-block does not 
run  hs-show-hook
has caused the Emacs bug report #4548,
regarding 23.1.50; hideshow.el - hs-show-block does not run hs-show-hook
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact address@hidden
immediately.)


-- 
4548: http://emacsbugs.donarmstrong.com/cgi-bin/bugreport.cgi?bug=4548
Emacs Bug Tracking System
Contact address@hidden with problems
--- Begin Message --- Subject: 23.1.50; hideshow.el - hs-show-block does not run hs-show-hook Date: Thu, 24 Sep 2009 15:35:14 +0200
In hideshow.el, there is a hook 'hs-show-hook' which should be run
whenever some text is shown again (i.e., unfolded).

However, the command hs-show-block does not run this hook; a (trivial)
patch which will fix this is attached.

Regards,
David

Index: hideshow.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/hideshow.el,v
retrieving revision 1.80
diff -u -r1.80 hideshow.el
--- hideshow.el 14 Aug 2009 23:02:41 -0000      1.80
+++ hideshow.el 24 Sep 2009 13:28:55 -0000
@@ -869,8 +869,8 @@
                    q (progn (hs-forward-sexp (match-data t) 1) (point)))))
       (when (and p q)
         (hs-discard-overlays p q)
-        (goto-char (if end q (1+ p)))))
-    (run-hooks 'hs-show-hook))))
+        (goto-char (if end q (1+ p))))))
+   (run-hooks 'hs-show-hook)))
 
 (defun hs-hide-level (arg)
   "Hide all blocks ARG levels below this block.

--- End Message ---
--- Begin Message --- Subject: Re: bug#4548: 23.1.50; hideshow.el - hs-show-block does not run hs-show-hook Date: Fri, 25 Sep 2009 02:33:10 +0200
On Thu, Sep 24, 2009 at 15:35, David Engster <address@hidden> wrote:

> However, the command hs-show-block does not run this hook; a (trivial)
> patch which will fix this is attached.

Committed, thanks.

    Juanma

--- End Message ---

reply via email to

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