help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: move point to first error, without opening target buffer


From: Sam Halliday
Subject: Re: move point to first error, without opening target buffer
Date: Thu, 24 Dec 2015 16:11:09 -0800 (PST)
User-agent: G2/1.0

On Thursday, 24 December 2015 23:32:27 UTC, Sam Halliday  wrote:
> On Thursday, 24 December 2015 23:15:33 UTC, Sam Halliday  wrote:
> > Dear Emacs users,
> > 
> > I am using a package called `ag' as a faster replacement for grep 
> > (silversearcher), installing the emacs package like so:
> > 
> >     (use-package ag
> >       :commands ag
> >       :config
> >       (add-hook 'ag-search-finished-hook 'next-error-no-select))
> > 
> > for all intents and purposes, this could be any subprocess that uses the 
> > `compile' support and search results are shown as "errors".
> > 
> > Ag has a hook (see above) which runs when the search is complete. What I'm 
> > trying to do is to make the point jump to the first search result, so that 
> > I don't have to manually `C-x o' and then `C-s' to the hits (sometimes the 
> > preamble can be quite long).
> > 
> > What I have above is nearly there, but it opens the first search result in 
> > a buffer and I don't want that. I just want the point to move to the first 
> > hit so I can manually select which ones I care about. Reading through 
> > `simple.el' I'm pretty confused about how I can achieve that, could 
> > somebody please help?
> > 
> > In addition, it would be far better if the hook was run when the first 
> > search result (or "error") was detected. There doesn't appear to be a hook 
> > point for this, but maybe I'm wrong.
> 
> 
> Thanks to Sasha on #emacs for pointing me at compilation-next-error, used 
> like this in the hook, it works a treat!
> 
>   (defun next-match-jump ()
>     "Jump the point and user's focus to first match in a `compile'."
>     (pop-to-buffer next-error-last-buffer)
>     (compilation-next-error 1))

actually, much better is this

(setq compilation-scroll-output 'first-error)

(use-package ag
  :commands ag
  :init
  (setq ag-reuse-window 't)
  :config
  (add-hook 'ag-search-finished-hook (lambda () (pop-to-buffer 
next-error-last-buffer))))


reply via email to

[Prev in Thread] Current Thread [Next in Thread]