Преглед на файлове

use my-rgrep for search-symbol

pull/1/head
10sr преди 11 години
родител
ревизия
515a593129
променени са 1 файла, в които са добавени 1 реда и са изтрити 9 реда
  1. +1
    -9
      emacs.el

+ 1
- 9
emacs.el Целия файл

@@ -911,15 +911,7 @@ If called intearctively, find word at point."
(if (and (require 'gtags nil t)
(gtags-get-rootpath))
(gtags-goto-tag word "s")
(require 'grep)
(if (eq 0
(shell-command "git rev-parse --git-dir"))
(compilation-start (format "git --no-pager grep -nH -e '%s'"
word)
'grep-mode)
;; TODO: handle ack
(grep (format "grep -nH -e '%s' -r ."
word))))
(my-rgrep word))
(message "No word at point.")
nil))



Зареждане…
Отказ
Запис