equal
deleted
inserted
replaced
17 (if (search-backward-regexp "^$" nil t) |
17 (if (search-backward-regexp "^$" nil t) |
18 (forward-char) |
18 (forward-char) |
19 (goto-char (point-min))) |
19 (goto-char (point-min))) |
20 (search-forward-regexp "^.*") |
20 (search-forward-regexp "^.*") |
21 (find-file-other-window (match-string 0)) |
21 (find-file-other-window (match-string 0)) |
22 (goto-line lineno))))) |
22 (goto-char (point-min)) |
|
23 (forward-line (1- lineno)))))) |
23 |
24 |
24 (defun my-ag-kill-process () |
25 (defun my-ag-kill-process () |
25 (interactive) |
26 (interactive) |
26 (let ( (proc (get-buffer-process (current-buffer))) ) |
27 (let ( (proc (get-buffer-process (current-buffer))) ) |
27 (if proc |
28 (if proc |