* gnus-undo.el (gnus-undo-register-1): Limit the undo actions to 100
actions.
+ (gnus-undo-register-1): Revert last change.
* gnus-group.el (gnus-group-completing-read): Protect against not
having completion-styles bound.
;; We are on a boundary, so we create a new action.
(gnus-undo-boundary
(push (list function) gnus-undo-actions)
- ;; Don't let the undo actions grow infinitely.
- (when (> (length gnus-undo-actions) 100)
- (setcdr (nthcdr 100 gnus-undo-actions) nil))
(setq gnus-undo-boundary nil))
;; Prepend the function to an old action.
(gnus-undo-actions