comparison lisp/gnus/gnus-ems.el @ 22:8fc7fe29b841 r19-15b94

Import from CVS: tag r19-15b94
author cvs
date Mon, 13 Aug 2007 08:50:29 +0200
parents 0293115a14e9
children ec9a17fef872
comparison
equal deleted inserted replaced
21:b88636d63495 22:8fc7fe29b841
193 (point)) 193 (point))
194 gnus-mouse-face-prop gnus-mouse-face) 194 gnus-mouse-face-prop gnus-mouse-face)
195 (insert " " gnus-tmp-subject-or-nil "\n")) 195 (insert " " gnus-tmp-subject-or-nil "\n"))
196 ))) 196 )))
197 197
198 (defun gnus-region-active-p ()
199 "Say whether the region is active."
200 (and (boundp 'transient-mark-mode)
201 transient-mark-mode
202 (boundp 'mark-active)
203 mark-active))
198 204
199 (provide 'gnus-ems) 205 (provide 'gnus-ems)
200 206
201 ;; Local Variables: 207 ;; Local Variables:
202 ;; byte-compile-warnings: '(redefine callargs) 208 ;; byte-compile-warnings: '(redefine callargs)