* [PATCH] pass old-topic to read-string
@ 2001-11-04 8:55 Katsuhiro Hermit Endo
2001-11-04 14:14 ` ShengHuo ZHU
0 siblings, 1 reply; 2+ messages in thread
From: Katsuhiro Hermit Endo @ 2001-11-04 8:55 UTC (permalink / raw)
Index: lisp/gnus-topic.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-topic.el,v
retrieving revision 6.14
diff -u -u -r6.14 gnus-topic.el
--- lisp/gnus-topic.el 2001/10/14 23:12:40 6.14
+++ lisp/gnus-topic.el 2001/11/04 08:40:49
@@ -1450,7 +1450,7 @@
(interactive
(let ((topic (gnus-current-topic)))
(list topic
- (read-string (format "Rename %s to: " topic)))))
+ (read-string "Rename topic to: " topic))))
;; Check whether the new name exists.
(when (gnus-topic-find-topology new-name)
(error "Topic '%s' already exists" new-name))
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: [PATCH] pass old-topic to read-string
2001-11-04 8:55 [PATCH] pass old-topic to read-string Katsuhiro Hermit Endo
@ 2001-11-04 14:14 ` ShengHuo ZHU
0 siblings, 0 replies; 2+ messages in thread
From: ShengHuo ZHU @ 2001-11-04 14:14 UTC (permalink / raw)
Katsuhiro Hermit Endo <hermit@koka-in.org> writes:
> Index: lisp/gnus-topic.el
> ===================================================================
> RCS file: /usr/local/cvsroot/gnus/lisp/gnus-topic.el,v
> retrieving revision 6.14
> diff -u -u -r6.14 gnus-topic.el
> --- lisp/gnus-topic.el 2001/10/14 23:12:40 6.14
> +++ lisp/gnus-topic.el 2001/11/04 08:40:49
> @@ -1450,7 +1450,7 @@
> (interactive
> (let ((topic (gnus-current-topic)))
> (list topic
> - (read-string (format "Rename %s to: " topic)))))
> + (read-string "Rename topic to: " topic))))
> ;; Check whether the new name exists.
> (when (gnus-topic-find-topology new-name)
> (error "Topic '%s' already exists" new-name))
>
Thanks for the patch. I'd like to use
(read-string (format "Rename %s to: " topic) topic))))
instead.
ShengHuo
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2001-11-04 14:14 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2001-11-04 8:55 [PATCH] pass old-topic to read-string Katsuhiro Hermit Endo
2001-11-04 14:14 ` ShengHuo ZHU
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).