1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 02:31:03 -08:00

Revert "Fix allout-widgets-mode handling of edits to item cue, fixing (bug#11312)"

This reverts commit 8e13d33248.

Backporting it to emacs-27 was not appropriate.
This commit is contained in:
Ken Manheimer 2020-07-21 10:52:50 -04:00
parent 4db3235fd8
commit 8e4eae0ce3

View file

@ -684,7 +684,7 @@ outline hot-spot navigation (see `allout-mode')."
(setplist 'allout-cue-span-category nil) (setplist 'allout-cue-span-category nil)
(put 'allout-cue-span-category 'evaporate t) (put 'allout-cue-span-category 'evaporate t)
(put 'allout-cue-span-category (put 'allout-cue-span-category
'modification-hooks '(allout-graphics-modification-handler)) 'modification-hooks '(allout-body-modification-handler))
(put 'allout-cue-span-category 'local-map allout-cue-span-keymap) (put 'allout-cue-span-category 'local-map allout-cue-span-keymap)
(put 'allout-cue-span-category 'mouse-face widget-button-face) (put 'allout-cue-span-category 'mouse-face widget-button-face)
(put 'allout-cue-span-category 'pointer 'arrow) (put 'allout-cue-span-category 'pointer 'arrow)
@ -2005,7 +2005,8 @@ reapplying this method will rectify the glyphs."
;; NOTE: most of the cue-area ;; NOTE: most of the cue-area
(when (not (widget-get item-widget :is-container)) (when (not (widget-get item-widget :is-container))
(let* ((cue-start (widget-get item-widget :icon-end)) (let* ((cue-start (or (widget-get item-widget :distinctive-end)
(widget-get item-widget :icon-end)))
(body-start (widget-get item-widget :body-start)) (body-start (widget-get item-widget :body-start))
;(expanded (widget-get item-widget :expanded)) ;(expanded (widget-get item-widget :expanded))
;(has-subitems (widget-get item-widget :has-subitems)) ;(has-subitems (widget-get item-widget :has-subitems))