diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2009-05-18 19:22:09 +0200 |
|---|---|---|
| committer | Jim Meyering <meyering@redhat.com> | 2009-05-18 19:22:09 +0200 |
| commit | 56fbf557dc037f5b88a201a850d12edf58900e5a (patch) | |
| tree | a7cf650671cc552de40da69f67238e9ec998d245 /lisp | |
| parent | 29224e54e07711adaaf09d3d89e5e378e47e4368 (diff) | |
| download | idutils-56fbf557dc037f5b88a201a850d12edf58900e5a.tar.gz idutils-56fbf557dc037f5b88a201a850d12edf58900e5a.tar.bz2 idutils-56fbf557dc037f5b88a201a850d12edf58900e5a.zip | |
elisp: use `read-shell-command' in `gid'
* lisp/idutils.el (gid): Use `read-shell-command' instead of
`read-string', to allow for completion.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/idutils.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/idutils.el b/lisp/idutils.el index cc40ed5..643a825 100644 --- a/lisp/idutils.el +++ b/lisp/idutils.el @@ -1,5 +1,5 @@ ;;; idutils.el --- emacs interface to `lid -R grep', a.k.a. `gid' -;;; Copyright (C) 1995, 1996, 2006-2008 Free Software Foundation, Inc. +;;; Copyright (C) 1995, 1996, 2006-2009 Free Software Foundation, Inc. ;;; Greg McGary <gkm@gnu.ai.mit.edu>. ;; This file is part of GNU idutils. @@ -51,7 +51,7 @@ While gid runs asynchronously, you can use the \\[next-error] command to find the text that gid hits refer to. The command actually run is defined by the gid-command variable." - (interactive (list (read-string + (interactive (list (read-shell-command (concat "Run " gid-command " (with args): ") (thing-at-point 'symbol)))) (let (compile-command (compilation-error-regexp-alist grep-regexp-alist) |