Revert previous hideshow commit
Hideshow has defaults that are overridden if we look for derived modes
in hs-special-modes-alist. For instance, in lisp-interaction-mode
we'll choose a lookup based on parent modes, and that overrides the
default (bug#43032).
This reverts a415179b56
.
This commit is contained in:
parent
d494f9e81a
commit
64d2e5a7ad
2 changed files with 1 additions and 10 deletions
5
etc/NEWS
5
etc/NEWS
|
@ -876,11 +876,6 @@ window after starting). This variable defaults to nil.
|
|||
*** New 'diff-mode' font locking face 'diff-error'.
|
||||
This face is used for error messages from diff.
|
||||
|
||||
---
|
||||
*** 'hs-minor-mode' now heeds 'hs-special-modes-alist' for derived modes.
|
||||
The settings in 'hs-special-modes-alist' now also affect modes derived
|
||||
from those mentioned in that alist.
|
||||
|
||||
+++
|
||||
*** New global mode 'global-goto-address-mode'
|
||||
This will enable 'goto-address-mode' in all buffers.
|
||||
|
|
|
@ -225,8 +225,6 @@
|
|||
;;---------------------------------------------------------------------------
|
||||
;; user-configurable variables
|
||||
|
||||
(require 'cl-lib)
|
||||
|
||||
(defgroup hideshow nil
|
||||
"Minor mode for hiding and showing program and comment blocks."
|
||||
:prefix "hs-"
|
||||
|
@ -654,9 +652,7 @@ Otherwise, guess start, end and `comment-start' regexps; `forward-sexp'
|
|||
function; and adjust-block-beginning function."
|
||||
(if (and (bound-and-true-p comment-start)
|
||||
(bound-and-true-p comment-end))
|
||||
(let* ((lookup (cl-assoc-if (lambda (mode)
|
||||
(derived-mode-p major-mode mode))
|
||||
hs-special-modes-alist))
|
||||
(let* ((lookup (assoc major-mode hs-special-modes-alist))
|
||||
(start-elem (or (nth 1 lookup) "\\s(")))
|
||||
(if (listp start-elem)
|
||||
;; handle (START-REGEXP MDATA-SELECT)
|
||||
|
|
Loading…
Add table
Reference in a new issue