;ELC
|
;;; Compiled
|
;;; in Emacs version 26.1
|
;;; with all optimizations.
|
|
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
|
|
;;; This file does not contain utf-8 non-ASCII characters,
|
;;; and so can be loaded in Emacs versions earlier than 23.
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\302%\210\311\312\313\314\315DD\316\310\305\317\320&\210\311\321\313\314\322DD\323\310\305\317\324&\207" [require cl-lib helm helm-help custom-declare-group helm-man nil "Man and Woman applications for helm." :group custom-declare-variable helm-man-or-woman-function funcall function #[0 "\300\207" [Man-getpage-in-background] 1] "Default command to display a man page." :type (radio :tag "Preferred command to display a man page" (const :tag "Man" Man-getpage-in-background) (const :tag "Woman" woman)) helm-man-format-switches #[0 "\301\302\"\203 \303\207\304\207" [system-type memql (darwin macos) "%s" "-l %s"] 3] "Arguments to pass to the `manual-entry' function.\nArguments are passed to `manual-entry' with `format.'" string] 8)
|
#@94 All man pages on system.
|
Will be calculated the first time you invoke helm with this
|
source.
|
(defvar helm-man--pages nil (#$ . 1219))
|
#@78 Default action for jumping to a woman or man page from helm.
|
|
(fn CANDIDATE)
|
(defalias 'helm-man-default-action #[257 "\302\303\304!\"\3051D \211A\203 \306\307\310\311$\202 \211@\312=\203) \313\314 \"!\202> \31514 \316!0\202> \210\317 \210\313\314 \"!\2620\202K \210\317 \210\312!\207" [helm-man-or-woman-function helm-man-format-switches mapcar car woman-file-name-all-completions (error) helm-comp-read "ManFile: " :must-match t Man-getpage-in-background manual-entry format (error) woman-find-file kill-buffer] 7 (#$ . 1359)])
|
(defalias 'helm-man--init #[0 "\305\306!\210\305\307!\210\204 \310 \n\"\304 !\311\312\f\"\313\314\"\207" [helm-man--pages woman-manpath woman-path woman-expanded-directory-path woman-topic-all-completions require woman helm-utils woman-expand-directory-path mapcar car helm-init-candidates-in-buffer global] 3])
|
(defvar helm-source-man-pages (helm-make-source "Manual Pages" 'helm-source-in-buffer :init 'helm-man--init :persistent-action 'ignore :filtered-candidate-transformer #[514 "\300\301\"\207" [sort helm-generic-sort-fn] 5 "\n\n(fn CANDIDATES SOURCE)"] :action '(("Display Man page" . helm-man-default-action)) :group 'helm-man))
|
#@99 Preconfigured `helm' for Man and Woman pages.
|
With a prefix arg reinitialize the cache.
|
|
(fn ARG)
|
(defalias 'helm-man-woman #[257 "\211\203 \301\302\303\304\305\306$\207" [helm-man--pages nil helm :sources helm-source-man-pages :buffer "*helm man woman*"] 6 (#$ . 2551) "P"])
|
(provide 'helm-man)
|
