Re: Emacs pager?

[Tim X <timx@spamto.devnul.com>]

kai.grossjohann@uni-duisburg.de (Kai Großjohann) writes:

> I like to use eshell.  Very nifty.  Here is my version of less for
> eshell:
> 
> (defun eshell/less (&rest args)
>   "Invoke `view-file' on the file.
> \"less +42 foo\" also goes to line 42 in the buffer."
>   (while args
>     (if (string-match "\\`\\+\\([0-9]+\\)\\'" (car args))
>         (let* ((line (string-to-number (match-string 1 (pop args))))
>                (file (pop args)))
>           (view-file file)
>           (goto-line line))
>       (view-file (pop args)))))
> 
> The voodoo is for the line numbers.  If you don't need it, this should
> do, as well:
> 
> (defun eshell/less (&rest args)
>   "Invoke `view-file' on the given file(s)."
>   (while args (view-file (pop args))))
> 
> You can configure the key bindings of view-file, too.  view-mode-map
> is the variable I believe.


Kai, very nice. I had something similar to your second version, but I
like the addition with the line numbering. That one is going into my
emacs library today!


You just gotta love eshell. Although I've not done it, I've heard
there is even some out there who are using eshell as their default
loging shell on their linux boxes. Sometime, when I'm a bit bored, I
might even start looking at that myself...

Then again, with emacs and elisp, when do you get the chance to get
bored!

Tim
-- 
Tim X.
tcross (at) northnet com au