comparison lisp/=gnus.el @ 1612:d0a00faa2c98

* bytecomp.el: Declare unread-command-char an obsolete variable. * vip.el (vip-escape-to-emacs, vip-prefix-arg-value, vip-prefix-arg-com): Use unread-command-event instead of unread-command-char; respect its new semantics. * gnus.el (gnus-Subject-next-article): Same.
author Jim Blandy <jimb@redhat.com>
date Mon, 16 Nov 1992 01:35:55 +0000
parents 2596132752ff
children 04fb1d3d6992
comparison
equal deleted inserted replaced
1611:2701f8d53d25 1612:d0a00faa2c98
2285 (auto-select 2285 (auto-select
2286 ;; Confirm auto selection. 2286 ;; Confirm auto selection.
2287 (let ((char (read-char))) 2287 (let ((char (read-char)))
2288 (if (= char cmd) 2288 (if (= char cmd)
2289 (gnus-Subject-next-group nil) 2289 (gnus-Subject-next-group nil)
2290 (setq unread-command-char char)))) 2290 (setq unread-command-event char))))
2291 ) 2291 )
2292 )) 2292 ))
2293 ))) 2293 )))
2294 2294
2295 (defun gnus-Subject-next-unread-article () 2295 (defun gnus-Subject-next-unread-article ()