bug#6679: closed (locate-library does not provide a default when called interactively)

[GNU bug Tracking System]

Your message dated Fri, 03 Apr 2020 15:01:08 +0300
with message-id <address@hidden>
and subject line Re: bug#6679: locate-library does not provide a default when 
called interactively
has caused the debbugs.gnu.org bug report #6679,
regarding locate-library does not provide a default when called interactively
to be marked as done.

(If you believe you have received this mail in error, please contact
address@hidden.)


-- 
6679: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=6679
GNU Bug Tracking System
Contact address@hidden with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> locate-library does not provide a default when called interactively
>
>
>
>
> Date: 
>
> Tue, 20 Jul 2010 07:53:32 -0600
>
>
>
>
> User-agent: 
>
> Thunderbird 2.0.0.24 (Macintosh/20100228)
>
>
>
>
> See bug 6652 for a use case.
>
> Here's a patch -- should the default be included in the prompt, or
> is the user expected to know to try M-n?
>
> 2010-07-20  Kevin Rodgers  <address@hidden>
>
>         * subr.el (locate-library):  Provide a default LIBRARY
>         when called interactively.
>
>
> *** emacs-23.2/lisp/subr.el~    Sat Apr  3 16:26:12 2010
> --- emacs-23.2/lisp/subr.el     Tue Jul 20 07:38:58 2010
> ***************
> *** 1583,1589 ****
>     (interactive (list (completing-read "Locate library: "
>                                       (apply-partially
>                                          'locate-file-completion-table
> !                                        load-path (get-load-suffixes)))
>                      nil nil
>                      t))
>     (let ((file (locate-file library
> --- 1583,1594 ----
>     (interactive (list (completing-read "Locate library: "
>                                       (apply-partially
>                                          'locate-file-completion-table
> !                                        load-path (get-load-suffixes))
> !                                     nil nil nil nil
> !                                     ;; discard text props from default
> !                                     ;; to avoid side-effects (visiting file):
> !                                     (substring-no-properties
> !                                      (thing-at-point 'filename)))
>                      nil nil
>                      t))
>     (let ((file (locate-file library
>
>
> --
> Kevin Rodgers
> Denver, Colorado, USA
>
>
>
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: bug#6679: locate-library does not provide a default when called interactively
>
>
>
>
> Date: 
>
> Fri, 03 Apr 2020 15:01:08 +0300
>
>
>
>
> > From: Štěpán Němec
> >  <address@hidden>
> > Date: Sat, 28 Mar 2020 22:59:44 +0100
> > Cc: address@hidden
> > 
> > On Tue, 20 Jul 2010 21:14:09 -0600
> > Kevin Rodgers wrote:
> > 
> > > Assuming that complexity is justified, it ought to be factored into a
> > > read-library-name utility that both find-library and locate-library use.
> > 
> > The first part has since happened (`read-library-name'), all that is
> > needed is the latter. Patch attached.
> > 
> > > `C-h a -library\'' returns apropos-library and load-library in addition to
> > > find-library and locate-library, but it's not clear to me that they would
> > > benefit from a default.
> > 
> > The patch also handles `load-library'. The set of arguments/completions
> > expected/provided by `apropos-library' is slightly different and
> > requires other validation, so `read-library-name' wouldn't really help
> > there.
>
> Thanks, pushed to the master branch.
>
>
> --- End Message ---