Re: quoting only the region in reply -> wrong-type-argument

[sigurd@12move.de (Karl Pflästerer)]

On Fri, 11 Jan 2002, ShengHuo ZHU <- zsh@cs.rochester.edu wrote:
> The bug seems related to your advised function.

I have another problem with the function
`gnus-article-followup-with-original' 
Its definition is:
,----
| (defun gnus-article-followup-with-original ()
|   "Compose a followup to the current article.
| The text in the region will be yanked.  If the region isn't active,
| the entire article will be yanked."
|   (interactive)
|   (let ((article (cdr gnus-article-current)))
|     (if (not mark-active)
| 	(gnus-summary-followup (list (list article)))
|       ;; Deactivate active regions.
|       (when (and (boundp 'transient-mark-mode)
| 		 transient-mark-mode)
| 	(setq mark-active nil))
|       (gnus-summary-followup
|        (list (list article (buffer-substring (point) (mark))))))))
`----

`mark-active' is not known to XEmacs. I have to replace `mark-active'
with `zmacs-region-active-p', then everything is fine. The same is with
`gnus-article-reply-with-original' .

bye
   KP

-- 
 `Beware the Jabberwock, my son!
     The jaws that bite, the claws that catch!
  Beware the Jubjub bird, and shun
    The frumious Bandersnatch!'   "Lewis Carroll" "Jabberwocky"