[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: isearch and M-x occur questions(several)
From: |
Javier Oviedo |
Subject: |
Re: isearch and M-x occur questions(several) |
Date: |
Mon, 28 Apr 2003 09:54:43 -0400 |
I just tried this and it is quite nice!! Thanks.
--
=======
Javier
"Javier Oviedo" <email_joviedo@yahoo.com> wrote in message
news:b8jbgi$41a$1@tilde.itg.ti.com...
> I like that idea quite a bit. I will test it out. Thanks.
>
> --
> =======
> Javier
> "Johan Bockgård" <bojohan+news@dd.chalmers.se> wrote in message
> yoijbrytf5j7.fsf@helm.dd.chalmers.se">news:yoijbrytf5j7.fsf@helm.dd.chalmers.se...
> > kai.grossjohann@gmx.net (Kai Großjohann) writes:
> >
> > > Another useful thing might be to bind a key in isearch-mode-map that
> > > runs occur with the right options.
> >
> > I like that.
> >
> > (defun isearch-occur ()
> > "Run `occur' with current isearch string."
> > (interactive)
> > (let ((case-fold-search isearch-case-fold-search)
> > (search-string (if isearch-regexp
> > isearch-string
> > (regexp-quote isearch-string))))
> > (occur search-string)))
> >
> > (define-key isearch-mode-map [(control o)] 'isearch-occur)
> >
> >
> > --
> > Johan Bockgård
>
>