[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 01/08: Small fixes to ggtags-find-tag-regexp
From: |
Leo Liu |
Subject: |
[elpa] 01/08: Small fixes to ggtags-find-tag-regexp |
Date: |
Sun, 23 Feb 2014 09:58:10 +0000 |
leoliu pushed a commit to branch master
in repository elpa.
commit ae512f5eaecf435a3628f552e378b041e9f44ac5
Author: Leo Liu <address@hidden>
Date: Wed Feb 19 17:25:23 2014 +0800
Small fixes to ggtags-find-tag-regexp
---
ggtags.el | 15 +++++++++------
1 files changed, 9 insertions(+), 6 deletions(-)
diff --git a/ggtags.el b/ggtags.el
index 1cd40bf..fd23802 100644
--- a/ggtags.el
+++ b/ggtags.el
@@ -3,7 +3,7 @@
;; Copyright (C) 2013-2014 Free Software Foundation, Inc.
;; Author: Leo Liu <address@hidden>
-;; Version: 0.7.9
+;; Version: 0.7.10
;; Keywords: tools, convenience
;; Created: 2013-01-29
;; URL: https://github.com/leoliu/ggtags
@@ -641,14 +641,17 @@ Invert the match when called with a prefix arg
\\[universal-argument]."
(defun ggtags-find-tag-regexp (regexp directory)
"List tags matching REGEXP in DIRECTORY (default to project root)."
(interactive
- (list (ggtags-read-string "POSIX regexp")
- (if current-prefix-arg
- (read-directory-name "Directory: " nil nil t)
- (ggtags-current-project-root))))
+ (progn
+ (ggtags-check-project)
+ (list (ggtags-read-string "POSIX regexp")
+ (if current-prefix-arg
+ (read-directory-name "Directory: " nil nil t)
+ (ggtags-current-project-root)))))
(ggtags-check-project)
(let ((root (file-name-as-directory directory))
(cmd (ggtags-global-build-command
- nil nil "-l" "--regexp" (prin1-to-string regexp))))
+ nil nil "-l" "--regexp"
+ (prin1-to-string (substring-no-properties regexp)))))
(ggtags-global-start cmd root)))
(defun ggtags-query-replace (from to &optional delimited)
- [elpa] branch master updated (cae1efc -> 2b0d5df), Leo Liu, 2014/02/23
- [elpa] 01/08: Small fixes to ggtags-find-tag-regexp,
Leo Liu <=
- [elpa] 02/08: Fix #30: Remove M-o key binding in ggtags-global-mode, Leo Liu, 2014/02/23
- [elpa] 05/08: Teach ggtags-create-tags to retry if mkid is missing, Leo Liu, 2014/02/23
- [elpa] 06/08: Stricter search for GTAGS file in ggtags-find-project, Leo Liu, 2014/02/23
- [elpa] 03/08: Make buffer cache project root directory instead, Leo Liu, 2014/02/23
- [elpa] 04/08: Fix #33: support running ggtags on remote hosts (via tramp), Leo Liu, 2014/02/23
- [elpa] 07/08: Store 'global' options per project, Leo Liu, 2014/02/23
- [elpa] 08/08: Merge remote-tracking branch 'ggtags/master', Leo Liu, 2014/02/23