* M-q (message-fill-paragraph) broken in cvs
@ 2000-11-20 13:25 Bill White
2000-11-20 13:41 ` ShengHuo ZHU
2000-11-20 13:46 ` Bill White
0 siblings, 2 replies; 3+ messages in thread
From: Bill White @ 2000-11-20 13:25 UTC (permalink / raw)
Gnus v5.8.8, cvs as of 1200 UTC 20 Nov, GNU Emacs 20.7.1
(i586-pc-linux-gnu, X toolkit) of Thu Jun 22 2000 on
g.wolfram.com
,----
| Signaling: (wrong-number-of-arguments (lambda nil "Insert four newlines, and then reformat if inside quoted text." (interactive) (let ((point (point)) quoted) (save-excursion (beginning-of-line) (if (looking-at (sc-cite-regexp)) (setq quoted (buffer-substring (match-beginning 0) (match-end 0))))) (insert "
|
|
|
| ") (delete-region (point) (re-search-forward "[ ]*")) (when quoted (insert quoted)) (fill-paragraph nil) (goto-char point) (forward-line 2))) 1)
| message-newline-and-reformat(t)
| message-fill-paragraph()
| * call-interactively(message-fill-paragraph)
`----
,----[ C-h k M-q ]
| M-q runs the command message-fill-paragraph
| which is an interactive compiled Lisp function in `message'.
| (message-fill-paragraph)
|
| Like `fill-paragraph'.
`----
Cheers -
bw
--
Bill White . billw@wolfram.com . http://members.wri.com/billw
"No ma'am, we're musicians."
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: M-q (message-fill-paragraph) broken in cvs
2000-11-20 13:25 M-q (message-fill-paragraph) broken in cvs Bill White
@ 2000-11-20 13:41 ` ShengHuo ZHU
2000-11-20 13:46 ` Bill White
1 sibling, 0 replies; 3+ messages in thread
From: ShengHuo ZHU @ 2000-11-20 13:41 UTC (permalink / raw)
Bill White <billw@wolfram.com> writes:
> Gnus v5.8.8, cvs as of 1200 UTC 20 Nov, GNU Emacs 20.7.1
> (i586-pc-linux-gnu, X toolkit) of Thu Jun 22 2000 on
> g.wolfram.com
>
> ,----
> | Signaling: (wrong-number-of-arguments (lambda nil "Insert four newlines, and then reformat if inside quoted text." (interactive) (let ((point (point)) quoted) (save-excursion (beginning-of-line) (if (looking-at (sc-cite-regexp)) (setq quoted (buffer-substring (match-beginning 0) (match-end 0))))) (insert "
> |
> |
> |
> | ") (delete-region (point) (re-search-forward "[ ]*")) (when quoted (insert quoted)) (fill-paragraph nil) (goto-char point) (forward-line 2))) 1)
> | message-newline-and-reformat(t)
> | message-fill-paragraph()
> | * call-interactively(message-fill-paragraph)
> `----
>
> ,----[ C-h k M-q ]
> | M-q runs the command message-fill-paragraph
> | which is an interactive compiled Lisp function in `message'.
> | (message-fill-paragraph)
> |
> | Like `fill-paragraph'.
> `----
It seems you are using the old message-newline-and-reformat.
ShengHuo
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: M-q (message-fill-paragraph) broken in cvs
2000-11-20 13:25 M-q (message-fill-paragraph) broken in cvs Bill White
2000-11-20 13:41 ` ShengHuo ZHU
@ 2000-11-20 13:46 ` Bill White
1 sibling, 0 replies; 3+ messages in thread
From: Bill White @ 2000-11-20 13:46 UTC (permalink / raw)
False alarm! I had this tucked away in a dusty corner of my ~/.gnus:
,----[ ~/.gnus ]
| ; To: ding@gnus.org
| ; Subject: message-newline-and-reformat and supercite
| ; From: Vladimir Volovich <vvv@vvv.vsu.ru>
| ; Date: 26 Sep 1999 23:51:07 +0400
| ; Message-ID: <m3ln9tmoyc.fsf@vvv.vsu.ru>
| ; Xref: g.wolfram.com gnu.ding:10428
| (defun message-newline-and-reformat ()
| "Insert four newlines, and then reformat if inside quoted text."
| (interactive)
| (let ((point (point))
| quoted)
| (save-excursion
| (beginning-of-line)
| (if (looking-at (sc-cite-regexp))
| (setq quoted (buffer-substring (match-beginning 0) (match-end 0)))))
| (insert "\n\n\n\n")
| (delete-region (point) (re-search-forward "[ \t]*"))
| (when quoted
| (insert quoted))
| (fill-paragraph nil)
| (goto-char point)
| (forward-line 2)))
`----
Commented out and all's well now.
bw
--
Bill White . billw@wolfram.com . http://members.wri.com/billw
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~2000-11-20 13:46 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2000-11-20 13:25 M-q (message-fill-paragraph) broken in cvs Bill White
2000-11-20 13:41 ` ShengHuo ZHU
2000-11-20 13:46 ` Bill White
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).