I prefer Richard's proposal as below. Breaking the line in the doc string for woman-use-symbol-font may well be a good idea, but I would prefer to retain some white space after the comma.
Richard: Thanks for sending me the full context separately. Best wishes, Francis > -----Original Message----- > From: Richard M. Stallman [mailto:[EMAIL PROTECTED] > Sent: Friday 26 August 2005 1:03 pm > To: Emilio Lopes > Cc: emacs-devel@gnu.org; Francis J. Wright > Subject: Re: patch for woman (woman-topic-at-point) > > The problem is that "to suggest" for `woman' means to actually > *insert* the suggested name in the minibuffer, a behavior > described > as deprecated in the documentation of `completing-read'. > > That is an unnecessarily complex solution. It would be > better just to change *how* that name is offered. Instead of > inserting it in the minibuffer, make it the default, more or > less as below. > > This could be an unconditional change, so it would not > require any options. However, it might also be desirable to > check (perhaps as an > option) whether the name is valid before offering it as the default. > > Your diff includes some other miscellanious fixes, such as > breaking a line in a doc string, which might be good to > install independent of this. > > *** woman.el 07 Aug 2005 13:30:28 -0400 1.33 > --- woman.el 26 Aug 2005 06:02:31 -0400 > *************** > *** 1235,1245 **** > (completing-read > "Manual entry: " > woman-topic-all-completions nil 1 > ;; Initial input suggestion (was nil), with > ;; cursor at left ready to kill suggestion!: > (and woman-topic-at-point > (cons (or (current-word) "") 0)) ; nearest word > ! 'woman-topic-history))) > ;; Note that completing-read always returns a string. > (if (= (length topic) 0) > nil ; no topic, so no file! > --- 1235,1247 ---- > (completing-read > "Manual entry: " > woman-topic-all-completions nil 1 > + nil > + 'woman-topic-history > ;; Initial input suggestion (was nil), with > ;; cursor at left ready to kill suggestion!: > (and woman-topic-at-point > (cons (or (current-word) "") 0)) ; nearest > word ! ))) > ;; Note that completing-read always returns a string. > (if (= (length topic) 0) > nil ; no topic, so no file! > _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel