(hs-minor-mode-menu): Compare `hs-isearch-open' with t instead of

`comment' in :selected for "Code and Comment blocks" menu item.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5764330bcce9164f7e4fd49e7da7bf3a00be51e1..6ea84c84d1ad5c94722c3946f57c8c6e42ef8bda 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -22,6 +22,10 @@
        (minibuffer-local-map): Add menu items for next/previous
        history elements and isearch history forward/backward.
 
+       * progmodes/hideshow.el (hs-minor-mode-menu): Compare
+       `hs-isearch-open' with t instead of `comment' in :selected
+       for "Code and Comment blocks" menu item.
+
 2008-02-28  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * uniquify.el (uniquify-buffer-base-name): Undo last change.  Should be

diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el
index 2b8e2ec00898241458bd84903a05ebed6331652e..be284d1b0890f8f1e6dd1b68b6fdc5dbdcb05350 100644 (file)
--- a/lisp/progmodes/hideshow.el
+++ b/lisp/progmodes/hideshow.el
@@ -386,7 +386,7 @@ Use the command `hs-minor-mode' to toggle or set this variable.")
       :active t :style radio :selected (eq hs-isearch-open 'comment)]
      ["Code and Comment blocks" (setq hs-isearch-open t)
       :help "Show both hidden code and comment blocks when isearch matches inside them"
-      :active t :style radio :selected (eq hs-isearch-open 'comment)]
+      :active t :style radio :selected (eq hs-isearch-open t)]
      ["None" (setq hs-isearch-open nil)
       :help "Do not hidden code or comment blocks when isearch matches inside them"
       :active t :style radio :selected (eq hs-isearch-open nil)])))