these functions are called by generic code a lot--the effect was that
a user was forced to use the threads feature no matter what. In
addition the code to turn on gnus-show-threads was incorrect.
(defun gnus-summary-show-all-threads ()
"Show all thread subtrees."
(interactive)
- (or gnus-show-threads
- (gnus-summary-show-all-threads 1))
(if gnus-show-threads
(save-excursion
(let ((buffer-read-only nil))
(defun gnus-summary-show-thread ()
"Show thread subtrees."
(interactive)
- (or gnus-show-threads
- (gnus-summary-show-all-threads 1))
(if gnus-show-threads
(save-excursion
(let ((buffer-read-only nil))
(defun gnus-summary-hide-all-threads ()
"Hide all thread subtrees."
(interactive)
- (or gnus-show-threads
- (gnus-summary-show-all-threads 1))
(if gnus-show-threads
(save-excursion
;; Adjust cursor point.
(defun gnus-summary-hide-thread ()
"Hide thread subtrees."
(interactive)
- (or gnus-show-threads
- (gnus-summary-show-all-threads 1))
(if gnus-show-threads
(save-excursion
;; Adjust cursor point.