From 56fbf557dc037f5b88a201a850d12edf58900e5a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Mon, 18 May 2009 19:22:09 +0200 Subject: elisp: use `read-shell-command' in `gid' * lisp/idutils.el (gid): Use `read-shell-command' instead of `read-string', to allow for completion. --- lisp/idutils.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/idutils.el') 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 . ;; 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) -- cgit v1.2.3