~ubuntu-branches/ubuntu/karmic/emacs-snapshot/karmic

« back to all changes in this revision

Viewing changes to lisp/woman.el

  • Committer: Bazaar Package Importer
  • Author(s): Reinhard Tartler
  • Date: 2009-04-05 09:14:30 UTC
  • mto: This revision was merged to the branch mainline in revision 34.
  • Revision ID: james.westby@ubuntu.com-20090405091430-nw07lynn2arotjbe
Tags: upstream-20090320
ImportĀ upstreamĀ versionĀ 20090320

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
;;; woman.el --- browse UN*X manual pages `wo (without) man'
2
2
 
3
3
;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005,
4
 
;;   2006, 2007, 2008 Free Software Foundation, Inc.
 
4
;;   2006, 2007, 2008, 2009 Free Software Foundation, Inc.
5
5
 
6
6
;; Author: Francis J. Wright <F.J.Wright@qmul.ac.uk>
7
7
;; Maintainer: FSF
468
468
              (parse-colon-path paths)))
469
469
            ((string-match "\\`[a-zA-Z]:" paths)
470
470
             ;; Assume single DOS-style path...
471
 
             paths)
 
471
             (list paths))
472
472
            (t
473
473
             ;; Assume UNIX/Cygwin-style path-list...
474
474
             (woman-mapcan              ; splice list into list
1949
1949
      (fset 'Man-build-page-list Man-build-page-list)
1950
1950
      (fset 'Man-strip-page-headers Man-strip-page-headers)
1951
1951
      (fset 'Man-unindent Man-unindent)
1952
 
      (fset 'Man-goto-page Man-goto-page)))
 
1952
      (fset 'Man-goto-page Man-goto-page)
 
1953
      (setq tab-width woman-tab-width)))
1953
1954
  (setq major-mode 'woman-mode
1954
1955
        mode-name "WoMan")
1955
1956
  ;; Don't show page numbers like Man-mode does.  (Online documents do