diff options
author | Glenn Morris <rgm@gnu.org> | 2012-04-16 14:46:46 -0400 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2012-04-16 14:46:46 -0400 |
commit | 6b955486f5d3527479536b760a926ecea0447a80 (patch) | |
tree | b662546563f7543966e6504fe26ec76fe7af0d21 /lisp/woman.el | |
parent | 94ee8db5e0a8bfa2aa68859782960b7140dae935 (diff) | |
download | emacs-6b955486f5d3527479536b760a926ecea0447a80.tar.gz |
Replace a use of eval-after-load
* lisp/woman.el: Remove eval-after-load for tar-mode.
* lisp/tar-mode.el (tar-mode-map): Add woman binding and menu entry.
(woman-tar-extract-file): Autoload it.
Diffstat (limited to 'lisp/woman.el')
-rw-r--r-- | lisp/woman.el | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/lisp/woman.el b/lisp/woman.el index c76399a96e5..98ab27716a1 100644 --- a/lisp/woman.el +++ b/lisp/woman.el @@ -1,6 +1,6 @@ ;;; woman.el --- browse UN*X manual pages `wo (without) man' -;; Copyright (C) 2000-2012 Free Software Foundation, Inc. +;; Copyright (C) 2000-2012 Free Software Foundation, Inc. ;; Author: Francis J. Wright <F.J.Wright@qmul.ac.uk> ;; Maintainer: FSF @@ -1595,14 +1595,6 @@ Also make each path-info component into a list. (woman-process-buffer) (goto-char (point-min))))) -;; There is currently no `tar-mode-hook' so use ... -(eval-after-load "tar-mode" - '(progn - (define-key tar-mode-map "w" 'woman-tar-extract-file) - (define-key-after (lookup-key tar-mode-map [menu-bar immediate]) - [woman] '("Read Man Page (WoMan)" . woman-tar-extract-file) 'view))) - - (defvar woman-last-file-name nil "The full pathname of the last file formatted by WoMan.") |