Mercurial > emacs
comparison lisp/dired-x.el @ 68748:51fd7d4e1d8a
(dired-guess-shell-alist-default): Add .man as a `dired-man' target.
| author | Masatake YAMATO <jet@gyve.org> |
|---|---|
| date | Thu, 09 Feb 2006 19:20:46 +0000 |
| parents | 3bd95f4f2941 |
| children | 002eb5def536 4b3d39451150 |
comparison
equal
deleted
inserted
replaced
| 68747:d8d4d5dad20e | 68748:51fd7d4e1d8a |
|---|---|
| 1025 ;; Optional conversion to gzip format. | 1025 ;; Optional conversion to gzip format. |
| 1026 '(concat "znew" (if dired-guess-shell-gzip-quiet " -q") | 1026 '(concat "znew" (if dired-guess-shell-gzip-quiet " -q") |
| 1027 " " dired-guess-shell-znew-switches)) | 1027 " " dired-guess-shell-znew-switches)) |
| 1028 | 1028 |
| 1029 ;; The following four extensions are useful with dired-man ("N" key) | 1029 ;; The following four extensions are useful with dired-man ("N" key) |
| 1030 (list "\\.[0-9]$" '(progn (require 'man) | 1030 (list "\\.\\(?:[0-9]\\|man\\)$" '(progn (require 'man) |
| 1031 (if (Man-support-local-filenames) | 1031 (if (Man-support-local-filenames) |
| 1032 "man -l" | 1032 "man -l" |
| 1033 "cat * | tbl | nroff -man -h"))) | 1033 "cat * | tbl | nroff -man -h"))) |
| 1034 (list "\\.[0-9]\\.g?z$" '(progn (require 'man) | 1034 (list "\\.\\(?:[0-9]\\|man\\)\\.g?z$" '(progn (require 'man) |
| 1035 (if (Man-support-local-filenames) | 1035 (if (Man-support-local-filenames) |
| 1036 "man -l" | 1036 "man -l" |
| 1037 "gunzip -qc * | tbl | nroff -man -h")) | 1037 "gunzip -qc * | tbl | nroff -man -h")) |
| 1038 ;; Optional decompression. | 1038 ;; Optional decompression. |
| 1039 '(concat "gunzip" (if dired-guess-shell-gzip-quiet " -q"))) | 1039 '(concat "gunzip" (if dired-guess-shell-gzip-quiet " -q"))) |