ack.elc

;ELC
;;; Compiled by issactrotts@jaynes.local on Mon May  7 00:08:15 2012
;;; from file /Users/issactrotts/repos/emacs-nav/ack.el
;;; in Emacs version 23.3.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'compile)
#@105 Setting this value to `t' will have `ack' do its best to fill
in the --type argument to the ack command
(defvar ack-guess-type t (#$ . 542))
#@63 alist describing how to fill in the '--type=' argument to ack
(defvar ack-mode-type-map '(((c++-mode) . "cpp") ((c-mode) . "cc") ((css-mode) . "css") ((emacs-lisp-mode) . "elisp") ((fortran-mode) . "fortran") ((html-mode) . "html") ((xml-mode nxml-mode) . "xml") ((java-mode) . "java") ((lisp-mode) . "lisp") ((perl-mode cperl-mode yaml-mode) . "perl")) (#$ . 689))
#@44 The command to be run by the ack function.
(defvar ack-command "ack --nocolor --nogroup " (#$ . 1061))
(defalias 'ack-find-type-for-mode #[nil "\300\301\215\207" [found (byte-code "\304\211\205 \n@	@\235\203\305\306	A\"\210\nA\211\204\304*\207" [ack-mode-type-map mode-type --dolist-tail-- major-mode nil throw found] 4)] 2])
(defalias 'ack-build-command #[nil "\303 	\n\205\205\304P\305Q)\207" [type ack-command ack-guess-type ack-find-type-for-mode "--type=" " "] 3])
(byte-code "\302\303N\204\304\302\303\305\306!#\210\307\310!\204\304\310\311\312#\210\310B\313\310!\204*\314\310\315 \"\210\310\303N\2048\304\310\303\305\316!#\210\307\317!\204D\304\317\311\312#\210\317B\313\317!\204T\314\317\320 \"\210\317\303N\204b\304\317\303\305\321!#\210\304\301\311\312#\210\301B\313\301!\204|\314\301\322\301\323\"\210	\"\210\301\303N\204\212\304\301\303\305\324!#\210\304\312\325\326#\207" [current-load-list ack-mode-abbrev-table ack-mode-hook variable-documentation put purecopy "Hook run when entering Ack mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" boundp ack-mode-map definition-name ack-mode default-boundp set-default make-sparse-keymap "Keymap for `ack-mode'." ack-mode-syntax-table make-syntax-table "Syntax table for `ack-mode'." define-abbrev-table nil "Abbrev table for `ack-mode'." derived-mode-parent compilation-mode] 5)
#@199 Ack compilation mode.

In addition to any hooks its parent mode `compilation-mode' might have run,
this mode runs the hook `ack-mode-hook', as the final step
during initialization.

\{ack-mode-map}
(defalias 'ack-mode #[nil "\306\300!\210\307\310 \210\311\312\310\313N\203\314\311\313\310\313N#\210\315!\204'\316\317 \"\210\320\f!\211\2036
\321 =\203<\322\f\323 \"\210)\324!\210\325\f!\210)\326\327!\207" [delay-mode-hooks major-mode mode-name ack-mode-map ack-mode-syntax-table parent make-local-variable t compilation-mode ack-mode "Ack" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table use-local-map set-syntax-table run-mode-hooks ack-mode-hook ack-mode-abbrev-table local-abbrev-table] 6 (#$ . 2524) nil])
(byte-code "\301B\302\301!\204\303\301\304\"\210\305B\302\305!\204\303\305\304\"\210\304\207" [current-load-list ack-history default-boundp set-default nil ack-host-defaults-alist] 3)
#@49 Like grep, but using ack-command as the default
(defalias 'ack #[nil "\306Y\203
\307\310!\210\202\307\311!\210\312\313	\"\n\f
\314\310!\210

\211,\207" [emacs-major-version null-device ack-command ack-history ack-host-defaults-alist grep-host-defaults-alist 22 require grep compile format "< %s" call-interactively grep-history grep-command] 4 (#$ . 3540) nil])
(provide 'ack)