mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-21 e75a20334813452c6912c090d70a0de2c805f94d
commit | author | age
5cb5f7 1 ;ELC
C 2 ;;; Compiled
3 ;;; in Emacs version 26.1
4 ;;; with all optimizations.
5
6 ;;; This file uses dynamic docstrings, first added in Emacs 19.29.
7
8 ;;; This file does not contain utf-8 non-ASCII characters,
9 ;;; and so can be loaded in Emacs versions earlier than 23.
10
11 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
13
14
15 (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\210\300\307!\210\300\310!\210\300\311!\210\312\313\314\315\316\317\320\302\320\305\321\322& \210\323\324\325\326\327DD\330\320\313\331\332&\210\323\333\325\326\334DD\335\320\313\331\332&\207" [require subr-x projectile cl-lib grep helm helm-types helm-locate helm-buffers helm-files custom-declare-group helm-projectile nil "Helm support for projectile." :prefix "helm-projectile-" :group :link (url-link :tag "GitHub" "https://github.com/bbatsov/helm-projectile") custom-declare-variable helm-projectile-truncate-lines funcall function #[0 "\300\207" [nil] 1] "Truncate lines in helm projectile commands when non--nil.\n\nSome `helm-projectile' commands have similar behavior with existing\nHelms.  In these cases their respective custom var for truncation\nof lines will be honored.  E.g. `helm-buffers-truncate-lines'\ndictates the truncation in `helm-projectile-switch-to-buffer'." :type boolean helm-projectile-fuzzy-match #[0 "\300\207" [t] 1] "Enable fuzzy matching for Helm Projectile commands.\nThis needs to be set before loading helm-projectile.el."] 12)
16 #@105 In KEYMAP, define KEY - DEF sequence KEY1 as DEF1, KEY2 as DEF2 ...
17
18 (fn KEYMAP KEY DEF &rest BINDINGS)
19 (defalias 'helm-projectile-define-key '(macro . #[899 "\300\203(\301\302\303\304\305    DFFB\262\211A\262\242\262\211A\262\242\262\202\306!\207" [(progn) define-key lambda nil (interactive) helm-exit-and-execute-action reverse] 13 (#$ . 1564)]))
20 (byte-code "\300\301\302\303#\300\207" [function-put helm-projectile-define-key lisp-indent-function defun] 4)
21 #@1025 Given a Helm action list and a prescription, return a hacked Helm action list, after applying the PRESCRIPTION.
22
23 The Helm action list ACTIONS is of the form:
24
25 ((DESCRIPTION1 . FUNCTION1)
26  (DESCRIPTION2 . FUNCTION2)
27  ...
28  (DESCRIPTIONn . FUNCTIONn))
29
30 PRESCRIPTION is in the form:
31
32 (INSTRUCTION1 INSTRUCTION2 ... INSTRUCTIONn)
33
34 If an INSTRUCTION is a symbol, the action with function name
35 INSTRUCTION is deleted.
36
37 If an INSTRUCTION is of the form (FUNCTION1 . FUNCTION2), the
38 action with function name FUNCTION1 will change it's function to
39 FUNCTION2.
40
41 If an INSTRUCTION is of the form (FUNCTION . DESCRIPTION), and
42 if an action with function name FUNCTION exists in the original
43 Helm action list, the action in the Helm action list, with
44 function name FUNCTION will change it's description to
45 DESCRIPTION.  Otherwise, (FUNCTION . DESCRIPTION) will be added to
46 the action list.
47
48 Please check out how `helm-projectile-file-actions' is defined
49 for an example of how this function is being used.
50
51 (fn ACTIONS &rest PRESCRIPTION)
52 (defalias 'helm-projectile-hack-actions #[385 "\300\301\"\302\303\304\305\306\307!\310\"\311\312%\313!\"\314\211\203A\211@\211A\236A\211\262\203:;\2036\211\240\210\202:\211\241\210A\266\202\202\210\314\262\211\203u\211@\211<\203n\315@\"\204n\211@9\203n\211A;\203n\211A@BB\262A\266\202\202F\210\316\237\"\207" [cl-remove-if #[257 "\211<\207" #1=[] 2 "\n\n(fn ENTRY)"] cl-delete-if make-byte-code 257 "\211A\300>\207" vconcat vector #1# 3 "\n\n(fn ACTION)" copy-alist nil rassq append] 10 (#$ . 2046)])
53 #@112 A Helm action for jumping to project root using `vc-dir' or Magit.
54 DIR is a directory to be switched
55
56 (fn DIR)
57 (defalias 'helm-projectile-vc #[257 "\301\302!)\207" [projectile-require-project-root nil projectile-vc] 3 (#$ . 3612)])
58 #@73 A Helm action for compile a project.
59 DIR is the project root.
60
61 (fn DIR)
62 (defalias 'helm-projectile-compile-project #[257 "\303\304\n!*\207" [default-directory helm--reading-passwd-or-string helm-current-prefix-arg t projectile-compile-project] 3 (#$ . 3852)])
63 #@70 A Helm action for test a project.
64 DIR is the project root.
65
66 (fn DIR)
67 (defalias 'helm-projectile-test-project #[257 "\303\304\n!*\207" [default-directory helm--reading-passwd-or-string helm-current-prefix-arg t projectile-test-project] 3 (#$ . 4121)])
68 #@69 A Helm action for run a project.
69 DIR is the project root.
70
71 (fn DIR)
72 (defalias 'helm-projectile-run-project #[257 "\303\304\n!*\207" [default-directory helm--reading-passwd-or-string helm-current-prefix-arg t projectile-run-project] 3 (#$ . 4381)])
73 #@151 Remove selected projects from projectile project list.
74 _IGNORE means the argument does not matter.
75 It is there because Helm requires it.
76
77 (fn IGNORE)
78 (defalias 'helm-projectile-remove-known-project #[257 "\305\306\307\"\211G\310!\307\n\311=\203\312\202\n\313\211\313Crq\210\314!\210)\315\316\317\320\321!\322\"\323$\216\324\325\326\"\240!r\315\316\327\320\321!\330\"\331$\216\332@\333\"\210\334\335\336\"!\204]\337\340!\202j\341\342\"\210\343 \210\337\344\"*\262-\266\202\207" [helm-marked-buffer-name helm-always-two-windows helm-split-window-default-side helm-split-window-inside-p helm-reuse-last-window-split-state helm-marked-candidates :with-wildcard t temp-buffer-window-setup same below nil helm-format-columns-of-files make-byte-code 0 "\301\302\300\242\"\207" vconcat vector [quit-window kill] 3 internal--before-with-selected-window temp-buffer-window-show (display-buffer-below-selected (window-height . fit-window-to-buffer)) "\301\300!\207" [internal--after-with-selected-window] 2 select-window norecord y-or-n-p format "Remove *%s projects(s)? " message "(No removal performed)" mapc #[257 "\301\"\207" [projectile-known-projects delete] 4 "\n\n(fn P)"] projectile-save-known-projects "%s projects(s) removed"] 13 (#$ . 4639)])
79 #@40 Mapping for known projectile projects.
80 (defvar helm-projectile-projects-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\303\322\323#\210\211\207" [helm-map make-sparse-keymap set-keymap-parent define-key "" #[0 "\300\301!\207" [helm-exit-and-execute-action dired] 2 nil nil] [134217831] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-vc] 2 nil nil] [134217829] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-switch-to-eshell] 2 nil nil] "" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-grep] 2 nil nil] [134217827] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-compile-project] 2 nil nil] [134217844] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-test-project] 2 nil nil] [134217842] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-run-project] 2 nil nil] [134217796] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-remove-known-project] 2 nil nil]] 5) (#$ . 5915))
81 (byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable helm-source-projectile-projects-actions funcall function #[0 "\300\301\302\303\304\305\306\307\310\311\312\313\314\315\316&\207" [helm-make-actions "Switch to project" #[257 "\301\302!)\207" [projectile-completion-system helm projectile-switch-project-by-name] 3 "\n\n(fn PROJECT)"] "Open Dired in project's directory `C-d'" dired "Open project root in vc-dir or magit `M-g'" helm-projectile-vc "Switch to Eshell `M-e'" helm-projectile-switch-to-eshell "Grep in projects `C-s'" helm-projectile-grep "Compile project `M-c'. With C-u, new compile command" helm-projectile-compile-project "Remove project(s) from project list `M-D'" helm-projectile-remove-known-project] 15] "Actions for `helm-source-projectile-projects'." :group helm-projectile :type (alist :key-type string :value-type function)] 8)
82 #@44 Helm source for known projectile projects.
83 (defvar helm-source-projectile-projects (helm-make-source "Projectile projects" 'helm-source-sync :candidates #[0 "r\302!\203 \206p\211q\210    )\207" [helm-current-buffer projectile-known-projects buffer-live-p] 2] :fuzzy-match helm-projectile-fuzzy-match :keymap helm-projectile-projects-map :mode-line helm-read-file-name-mode-line-string :action 'helm-source-projectile-projects-actions) (#$ . 7926))
84 #@40 Mapping for dirty projectile projects.
85 (defvar helm-projectile-dirty-projects-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\303\322\323#\210\211\207" [helm-map make-sparse-keymap set-keymap-parent define-key "" #[0 "\300\301!\207" [helm-exit-and-execute-action dired] 2 nil nil] [134217839] #[0 "\300\301!\207" [helm-exit-and-execute-action #[257 "\301\302!)\207" [projectile-completion-system helm projectile-switch-project-by-name] 3 "\n\n(fn PROJECT)"]] 2 nil nil] [134217829] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-switch-to-eshell] 2 nil nil] "" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-grep] 2 nil nil] [134217827] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-compile-project] 2 nil nil] [134217844] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-test-project] 2 nil nil] [134217842] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-run-project] 2 nil nil] [134217796] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-remove-known-project] 2 nil nil]] 5) (#$ . 8383))
86 #@63 Helm source for dirty version controlled projectile projects.
87 (defvar helm-source-projectile-dirty-projects (helm-make-source "Projectile dirty projects" 'helm-source-sync :candidates #[0 "r\301!\203 \206p\211q\210\302 )\207" [helm-current-buffer buffer-live-p helm-projectile-get-dirty-projects] 2] :fuzzy-match helm-projectile-fuzzy-match :keymap helm-projectile-dirty-projects-map :mode-line helm-read-file-name-mode-line-string :action '(("Open project root in vc-dir or magit" . helm-projectile-vc) ("Switch to project `M-o'" lambda (project) (let ((projectile-completion-system 'helm)) (projectile-switch-project-by-name project))) ("Open Dired in project's directory `C-d'" . dired) ("Switch to Eshell `M-e'" . helm-projectile-switch-to-eshell) ("Grep in projects `C-s'" . helm-projectile-grep) ("Compile project `M-c'. With C-u, new compile command" . helm-projectile-compile-project))) (#$ . 9608))
88 #@92 Return dirty version controlled known projects as an alist to
89 have a nice display in Helm.
90 (defalias 'helm-projectile-get-dirty-projects #[0 "\300\301!\210\302 \211\303\211:\203@\262@B\262A\262\202    \211\237\266\203\303\211:\203I@\262\304\305\306\307\310A@\311#\"\312\313#B\262A\262\202&\211\237\266\203\211\303\211:\203o@\262G\203e]\202f\211\266\202A\262\202P\266\202\303\211:\203\225@\262\305\314\315GZ\316\"#B\262A\262\202t\211\237\266\203\317\320#\321\"\207" [message "Checking for dirty known projects..." projectile-check-vcs-status-of-known-projects nil propertize format "[%s]" mapconcat identity ", " face helm-match "%s%s    " make-string 32 cl-mapcar concat cl-pairlis] 13 (#$ . 10528)])
91 (define-key helm-etags-map "pf" #[0 "\300\301\302\"\207" [helm-run-after-exit helm-projectile-find-file nil] 3 nil nil])
92 #@123 Persistent action for file-related functionality.
93
94 Previews the contents of a file in a temporary buffer.
95
96 (fn CANDIDATE)
97 (defalias 'helm-projectile-file-persistent-action #[257 "\300\301!\302\303\304!\203\303\305!\230\203\306!\210\307\304\310\"\210\202(\211\"\210\307\304\311\"\210\210\307\305\"\207" [get-buffer-create " *helm-projectile persistent*" #[514 "\302!\210\303\304 \210\305!\210\211\306 \210)\307 \210\310\211\207" [inhibit-read-only buffer-file-name switch-to-buffer t erase-buffer insert-file-contents set-auto-mode font-lock-ensure nil] 4 "\n\n(fn BUF CANDIDATE)"] helm-attr previewp current-candidate kill-buffer helm-attrset nil t] 6 (#$ . 11412)])
98 #@18 
99
100 (fn CANDIDATE)
101 (defalias 'helm-projectile-find-files-eshell-command-on-file-action #[257 "\301!\302!)\207" [helm-ff-default-directory file-name-directory helm-find-files-eshell-command-on-file] 3 (#$ . 12100) nil])
102 #@18 
103
104 (fn CANDIDATE)
105 (defalias 'helm-projectile-ff-etags-select-action #[257 "\301!\302!)\207" [helm-ff-default-directory file-name-directory helm-ff-etags-select] 3 (#$ . 12326) nil])
106 #@12 
107
108 (fn DIR)
109 (defalias 'helm-projectile-switch-to-eshell #[257 "\302\303\304!!\305!*\207" [projectile-require-project-root helm-ff-default-directory nil file-name-directory projectile-expand-root helm-ff-switch-to-eshell] 4 (#$ . 12516) nil])
110 #@60 Return a list of files (only) in the current dired buffer.
111 (defalias 'helm-projectile-files-in-current-dired-buffer #[0 "\301C\302\212\301\211eb\210m\204,\212l\204%\303\304\211\"\211\262\203%\301\210\"\210)\305y\210\202\n)\210)\210\306\307\242\237\"\207" [buffer-read-only nil #[514 "\242B\240\207" [] 5 "\n\n(fn FLIST FNAME)"] dired-get-filename t 1 mapcar file-truename] 6 (#$ . 12767)])
112 #@32 Get all current Dired buffers.
113 (defalias 'helm-projectile-all-dired-buffers #[0 "\300\301\302\303\304 \"\"\207" [mapcar #[257 "r\211q\210\300 )\207" [buffer-name] 2 "\n\n(fn B)"] cl-remove-if-not #[257 "r\211q\210\301=\205\f\302 )\207" [major-mode dired-mode buffer-name] 3 "\n\n(fn B)"] buffer-list] 5 (#$ . 13177)])
114 #@67 Enable virtual Dired manager on remote host.
115 Disabled by default.
116 (defvar helm-projectile-virtual-dired-remote-enable nil (#$ . 13503))
117 #@132 Create a Dired buffer from chosen files.
118 CANDIDATE is the selected file, but choose the marked files if available.
119
120 (fn CANDIDATE)
121 (defalias 'helm-projectile-dired-files-new-action #[257 "\303\304 !\203\204\305\306\307\310\311\312#\"\207\313\314\315\316\317\320\321\"\"\"\322\323\324 \"\321\304 r\325\326!\2035\2027CB!q\210\327!\203E\330!\210\331!+\207" [helm-projectile-virtual-dired-remote-enable default-directory helm--reading-passwd-or-string file-remote-p projectile-project-root message "Virtual Dired manager is disabled in remote host. Enable with %s." propertize "helm-projectile-virtual-dired-remote-enable" face font-lock-keyword-face cl-remove-if-not #[257 "\211\300\230?\207" [#1=""] 3 "\n\n(fn F)"] mapcar #[257 "\300\301 \302#\207" [replace-regexp-in-string projectile-project-root #1#] 5 "\n\n(fn FILE)"] helm-marked-candidates :with-wildcard t completing-read "Select or enter a new buffer name: " helm-projectile-all-dired-buffers dired make-temp-name get-buffer kill-buffer rename-buffer] 8 (#$ . 13646)])
122 #@119 Add files to a Dired buffer.
123 CANDIDATE is the selected file.  Used when no file is explicitly marked.
124
125 (fn CANDIDATE)
126 (defalias 'helm-projectile-dired-files-add-action #[257 "\305\306 !\203\204\307\310\311\312\313\314#\"\207r\315    !\203    \206\"p\211q\210\n)\316=\203\220\317\320\321\"\321\306 \n\316=\203>\322 \206C\323\324\325 \"r\211q\210\326 )\327\330\331\332\203X\202[C\333\334$\"\335\"\336!\210r\337\340!\203\204\330\341\342\343\344\345 !\346\"\347\350%\"\202\207CB!q\210\351!+\207\352\353!\207" [helm-projectile-virtual-dired-remote-enable helm-current-buffer major-mode helm--reading-passwd-or-string default-directory file-remote-p projectile-project-root message "Virtual Dired manager is disabled in remote host. Enable with %s." propertize "helm-projectile-virtual-dired-remote-enable" face font-lock-keyword-face buffer-live-p dired-mode helm-marked-candidates :with-wildcard t buffer-name completing-read "Select a Dired buffer:" helm-projectile-all-dired-buffers helm-projectile-files-in-current-dired-buffer sort mapcar #[257 "\300\301 \302#\207" [replace-regexp-in-string projectile-project-root #1=""] 5 "\n\n(fn FILE)"] cl-nunion :test string-equal string-lessp kill-buffer dired make-temp-name make-byte-code 257 "\301\300\302#\207" vconcat vector [replace-regexp-in-string #1#] 5 "\n\n(fn FILE)" rename-buffer error "You're not in a Dired buffer to add"] 15 (#$ . 14697)])
127 #@135 Delete selected entries from a Dired buffer.
128 CANDIDATE is the selected file.  Used when no file is explicitly marked.
129
130 (fn CANDIDATE)
131 (defalias 'helm-projectile-dired-files-delete-action #[257 "\304\305 !\203\204\306\307\310\311\312\313#\"\207\314\305 r\315\n!\203#\n\206&p\211q\210\316 )r\211q\210\317 )\320\321\322\323\314\"\324\325$\326\"\327!\210r\330\331!\203`\332\333\334\335\336\337 !\340\"\341\342%\"\202cCB!q\210\343!+\207" [helm-projectile-virtual-dired-remote-enable helm--reading-passwd-or-string helm-current-buffer default-directory file-remote-p projectile-project-root message "Virtual Dired manager is disabled in remote host. Enable with %s." propertize "helm-projectile-virtual-dired-remote-enable" face font-lock-keyword-face t buffer-live-p buffer-name helm-projectile-files-in-current-dired-buffer sort cl-set-exclusive-or helm-marked-candidates :with-wildcard :test string-equal string-lessp kill-buffer dired make-temp-name mapcar make-byte-code 257 "\301\300\302#\207" vconcat vector [replace-regexp-in-string ""] 5 "\n\n(fn FILE)" rename-buffer] 14 (#$ . 16131)])
132 #@80 Run `projectile-find-file-hook' if using projectile.
133
134 (fn ORIG-FUN &rest ARGS)
135 (defalias 'helm-projectile-run-projectile-hooks-after-find-file #[385 "\205\f\301 \205\f\302\303!\207" [projectile-mode projectile-project-p run-hooks projectile-find-file-hook] 4 (#$ . 17250)])
136 (advice-add 'helm-find-file-or-marked :after 'helm-projectile-run-projectile-hooks-after-find-file)
137 #@47 Mapping for file commands in Helm Projectile.
138 (defvar helm-projectile-find-file-map (byte-code "\301!\302\303\304#\210\302\305\306#\210\302\307\310#\210\302\311\312#\210\302\313\314#\210\302\315\316#\210\302\317\320#\210\321\211\203A\211@\322\323#\210A\266\202\202.\210\211\207" [helm-find-files-map copy-keymap define-key "f" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-dired-files-new-action] 2 nil nil] "a" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-dired-files-add-action] 2 nil nil] [134217829] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-switch-to-eshell] 2 nil nil] [134217774] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-ff-etags-select-action] 2 nil nil] [134217761] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-find-files-eshell-command-on-file-action] 2 nil nil] [left] helm-previous-source [right] helm-next-source (helm-find-files-up-one-level helm-find-files-down-last-level) substitute-key-definition nil] 7) (#$ . 17633))
139 #@19 Action for files.
140 (defvar helm-projectile-file-actions (helm-projectile-hack-actions helm-find-files-actions 'helm-ff-browse-project 'helm-insert-file-name-completion-at-point 'helm-ff-find-sh-command 'helm-ff-cache-add-file '(helm-ff-switch-to-eshell . helm-projectile-switch-to-eshell) '(helm-ff-etags-select . helm-projectile-ff-etags-select-action) '(helm-find-files-eshell-command-on-file . helm-projectile-find-files-eshell-command-on-file-action) '(helm-find-file-as-root . "Find file as root `C-c r'") '(helm-projectile-dired-files-new-action . "Create Dired buffer from files `C-c f'") '(helm-projectile-dired-files-add-action . "Add files to Dired buffer `C-c a'")) (#$ . 18702))
141 #@216 Return non-nil if should move Helm selector after SELECTION.
142
143 SELECTION should be moved unless it's one of:
144
145 - Non-string
146 - Existing file
147 - Non-remote file that matches `helm-tramp-file-name-regexp'
148
149 (fn SELECTION)
150 (defalias 'helm-projectile--move-selection-p #[257 "\211;?\206\301!\206\302\"\205\303\304\305#??\207" [helm-tramp-file-name-regexp file-exists-p string-match file-remote-p nil t] 5 (#$ . 19399)])
151 #@120 Move to first real candidate.
152
153 Similar to `helm-ff--move-to-first-real-candidate', but without
154 unnecessary complexity.
155 (defalias 'helm-projectile--move-to-real #[0 "\300 \301 ?\205 \302\303\211#\304 ?\205\305!\266\202\205!\306 \210\202\207" [helm-get-current-source helm-empty-source-p helm-get-selection nil helm-end-of-source-p helm-projectile--move-selection-p helm-next-line] 5 (#$ . 19827)])
156 #@143 Hook function to remove `helm-projectile--move-to-real'.
157
158 Meant to be added to `helm-cleanup-hook', from which it removes
159  itself at the end.
160 (defalias 'helm-projectile--remove-move-to-real #[0 "\300\301\302\"\210\300\303\304\"\207" [remove-hook helm-after-update-hook helm-projectile--move-to-real helm-cleanup-hook helm-projectile--remove-move-to-real] 3 (#$ . 20239)])
161 #@46 Helm source definition for Projectile files.
162 (defvar helm-source-projectile-files-list (helm-make-source "Projectile files" 'helm-source-sync :before-init-hook #[0 "\300\301\302\"\210\300\303\304\"\207" [add-hook helm-after-update-hook helm-projectile--move-to-real helm-cleanup-hook helm-projectile--remove-move-to-real] 3] :candidates #[0 "\301 \205;r\302!\203\206p\211q\210\303 \304 \305\211:\2036@\262\306\"BB\262A\262\202\211\237\266\204)\207" [helm-current-buffer projectile-project-p buffer-live-p projectile-project-root projectile-current-project-files nil expand-file-name] 8] :filtered-candidate-transformer #[514 "r\302!\203 \206p\211q\210\303 \304\305    \"!    \211\306\230\262\204(\307    \"\203,\202]    \232\203E\310    \311\312#\305    !BB\266\203\202]\313\310    \311\312#\310\311\312#D\305    !\305    \"D#\266\202)\207" [helm-current-buffer helm-pattern buffer-live-p projectile-project-root file-relative-name expand-file-name "" assoc helm-ff-prefix-filename nil t cl-pairlis] 10 "\n\n(fn FILES SOURCE)"] :fuzzy-match helm-projectile-fuzzy-match :keymap helm-projectile-find-file-map :help-message 'helm-ff-help-message :mode-line helm-read-file-name-mode-line-string :action helm-projectile-file-actions :persistent-action 'helm-projectile-file-persistent-action :persistent-help "Preview file") (#$ . 20617))
163 #@66 Helm source definition for all Projectile files in all projects.
164 (defvar helm-source-projectile-files-in-all-projects-list (helm-make-source "Projectile files in all Projects" 'helm-source-sync :candidates #[0 "r\302!\203 \206p\211q\210\303\304 *\207" [helm-current-buffer projectile-require-project-root buffer-live-p nil projectile-all-project-files] 2] :keymap helm-projectile-find-file-map :help-message 'helm-ff-help-message :mode-line helm-read-file-name-mode-line-string :action helm-projectile-file-actions :persistent-action 'helm-projectile-file-persistent-action :persistent-help "Preview file") (#$ . 21977))
165 (defvar helm-projectile-dired-file-actions (helm-projectile-hack-actions helm-projectile-file-actions '(helm-projectile-dired-files-delete-action . "Remove entry(s) from Dired buffer `C-c d'")))
166 #@53 Helm source definition for Projectile delete files.
167 (defvar helm-source-projectile-dired-files-list (byte-code "\303\304\305\306\307\310\311\312\313\314\315!\316\317\320#\210\211\262\321\322\323    \324\n&\207" [helm-projectile-find-file-map helm-read-file-name-mode-line-string helm-projectile-dired-file-actions helm-make-source "Projectile files in current Dired buffer" helm-source-in-buffer :data #[0 "\302\303 !\205    ??\205    \304=\205\305 \207" [helm-projectile-virtual-dired-remote-enable major-mode file-remote-p projectile-project-root dired-mode helm-projectile-files-in-current-dired-buffer] 2] :filter-one-by-one #[257 "\301\302!)\207" [helm-ff-transformer-show-only-basename t helm-ff-filter-candidate-one-by-one] 3 "\n\n(fn FILE)"] :action-transformer helm-find-files-action-transformer :keymap copy-keymap define-key "d" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-dired-files-delete-action] 2 nil nil] :help-message helm-ff-help-message :mode-line :action] 17) (#$ . 22806))
168 #@68 Jump to a selected directory DIR from `helm-projectile'.
169
170 (fn DIR)
171 (defalias 'helm-projectile-dired-find-dir #[257 "\300\301\302 \"!\210\303\304!\207" [dired expand-file-name projectile-project-root run-hooks projectile-find-dir-hook] 5 (#$ . 23833)])
172 #@68 Jump to a selected directory DIR from `helm-projectile'.
173
174 (fn DIR)
175 (defalias 'helm-projectile-dired-find-dir-other-window #[257 "\300\301\302 \"!\210\303\304!\207" [dired-other-window expand-file-name projectile-project-root run-hooks projectile-find-dir-hook] 5 (#$ . 24092)])
176 #@46 Helm source for listing project directories.
177 (defvar helm-source-projectile-directories-list (byte-code "\303\304\305\306\307\310\311\312\313\314 \315    \"\210\316\317\320#\210\316\321\322#\210\316\323\324#\210\316\325\326#\210\316\327\330#\210\316\331\332#\210\316\333\334#\210\211\262\335\336\337\n\340\341&\207" [helm-projectile-fuzzy-match helm-map helm-read-file-name-mode-line-string helm-make-source "Projectile directories" helm-source-sync :candidates #[0 "\302 \205+r\303!\203\206p\211q\210    \203!\304\305\306 \"\202#\306 \307\310 \"\262)\207" [helm-current-buffer projectile-find-dir-includes-top-level projectile-project-p buffer-live-p append ("./") projectile-current-project-dirs helm-projectile--files-display-real projectile-project-root] 4] :fuzzy-match :action-transformer helm-find-files-action-transformer :keymap make-sparse-keymap set-keymap-parent define-key [left] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-previous-source] 2 nil nil] [right] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-next-source] 2 nil nil] "o" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-dired-find-dir-other-window] 2 nil nil] [134217829] #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-switch-to-eshell] 2 nil nil] "f" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-dired-files-new-action] 2 nil nil] "a" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-dired-files-add-action] 2 nil nil] "" #[0 "\300\301!\207" [helm-exit-and-execute-action helm-projectile-grep] 2 nil nil] :help-message helm-ff-help-message :mode-line :action (("Open Dired" . helm-projectile-dired-find-dir) ("Open Dired in other window `C-c o'" . helm-projectile-dired-find-dir) ("Switch to Eshell `M-e'" . helm-projectile-switch-to-eshell) ("Grep in projects `C-s'" . helm-projectile-grep) ("Create Dired buffer from files `C-c f'" . helm-projectile-dired-files-new-action) ("Add files to Dired buffer `C-c a'" . helm-projectile-dired-files-add-action))] 17) (#$ . 24377))
178 (defvar helm-projectile-buffers-list-cache nil)
179 (byte-code "\300\301\302\303!\"\210\300\304\305\303!\"\210\300\306\304\"\210\307\306\310\311#\210\312\303\313\304#\314\303\315\316\317$\207" [defalias helm-source-projectile-buffer-p eieio-make-class-predicate helm-source-projectile-buffer helm-source-projectile-buffer--eieio-childp eieio-make-child-predicate helm-source-projectile-buffer-child-p make-obsolete "use (cl-typep ... \\='helm-source-projectile-buffer) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (helm-source-sync helm-type-buffer) ((init :initform (lambda nil (setq helm-projectile-buffers-list-cache (ignore-errors (cdr (projectile-project-buffer-names)))) (let ((result (cl-loop for b in helm-projectile-buffers-list-cache maximize (length b) into len-buf maximize (length (with-current-buffer b (symbol-name major-mode))) into len-mode finally return (cons len-buf len-mode)))) (unless helm-buffer-max-length (setq helm-buffer-max-length (car result))) (unless helm-buffer-max-len-mode (setq helm-buffer-max-len-mode (cdr result)))))) (candidates :initform helm-projectile-buffers-list-cache) (matchplugin :initform nil) (match :initform 'helm-buffers-match-function) (persistent-action :initform 'helm-buffers-list-persistent-action) (keymap :initform helm-buffer-map) (volatile :initform t) (persistent-help :initform "Show this buffer / C-u \\[helm-execute-persistent-action]: Kill this buffer")) nil] 6)
180 #@86 Create a new object of class type `helm-source-projectile-buffer'.
181
182 (fn &rest SLOTS)
183 (defalias 'helm-source-projectile-buffer #[128 "\300\301\302#\207" [apply make-instance helm-source-projectile-buffer] 5 (#$ . 27911)])
184 (byte-code "\300\301\302\303#\300\207" [function-put helm-source-projectile-buffer compiler-macro helm-source-projectile-buffer--anon-cmacro] 4)
185 #@26 
186
187 (fn WHOLE &rest SLOTS)
188 (defalias 'helm-source-projectile-buffer--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp--warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 28284)])
189 (defvar helm-source-projectile-buffers-list (helm-make-source "Project buffers" 'helm-source-projectile-buffer))
190 #@61 Helm source definition for recent files in current project.
191 (defvar helm-source-projectile-recentf-list (helm-make-source "Projectile recent files" 'helm-source-sync :candidates #[0 "\301 \205r\302!\203\206p\211q\210\303\304 \305 \")\207" [helm-current-buffer projectile-project-p buffer-live-p helm-projectile--files-display-real projectile-recentf-files projectile-project-root] 3] :fuzzy-match helm-projectile-fuzzy-match :keymap helm-projectile-find-file-map :help-message 'helm-ff-help-message :mode-line helm-read-file-name-mode-line-string :action helm-projectile-file-actions :persistent-action 'helm-projectile-file-persistent-action :persistent-help "Preview file") (#$ . 28646))
192 (defvar helm-source-projectile-files-and-dired-list '(helm-source-projectile-dired-files-list helm-source-projectile-files-list))
193 (defvar helm-source-projectile-directories-and-dired-list '(helm-source-projectile-dired-files-list helm-source-projectile-directories-list))
194 (byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable helm-projectile-sources-list funcall function #[0 "\300\207" [(helm-source-projectile-buffers-list helm-source-projectile-files-list helm-source-projectile-projects)] 1] "Default sources for `helm-projectile'." :type list :group helm-projectile] 8)
195 #@498 Template for generic `helm-projectile' commands.
196 COMMAND is a command name to be appended with "helm-projectile" prefix.
197 SOURCE is a Helm source that should be Projectile specific.
198 PROMPT is a string for displaying as a prompt.
199 NOT-REQUIRE-ROOT specifies the command doesn't need to be used in a
200 project root.
201 TRUNCATE-LINES-VAR is the symbol used dictate truncation of lines.
202 Defaults is `helm-projectile-truncate-lines'.
203
204 (fn COMMAND SOURCE PROMPT &optional NOT-REQUIRE-ROOT TRUNCATE-LINES-VAR)
205 (defalias 'helm-projectile-command '(macro . #[1283 "\211\204\300\262\301\302\303P!\304\305\306\307\310\311\312\n\313BBF\314\315\316\317 \320\321\322\323\324D\257    E\257\207" [helm-projectile-truncate-lines defun intern "helm-projectile-" (&optional arg) "Use projectile with Helm for finding files in project\n\nWith a prefix ARG invalidates the cache first." (interactive "P") if (projectile-project-p) (projectile-maybe-invalidate-cache arg) unless ((error "You're not in a project")) let ((helm-ff-transformer-show-only-basename nil) (helm-boring-file-regexp-list nil)) helm :sources :buffer (concat "*helm projectile: " (projectile-project-name) "*") :truncate-lines :prompt projectile-prepend-project-name] 23 (#$ . 29960)]))
206 #@123 Use projectile with Helm for finding files in project
207
208 With a prefix ARG invalidates the cache first.
209
210 (fn &optional ARG)
211 (defalias 'helm-projectile-switch-project #[256 "\303 \203    \304!\210\305\211\306\307\310\311\312\313 \314Q\315\n\316\317\320!&*\207" [helm-boring-file-regexp-list helm-ff-transformer-show-only-basename helm-projectile-truncate-lines projectile-project-p projectile-maybe-invalidate-cache nil helm :sources helm-source-projectile-projects :buffer "*helm projectile: " projectile-project-name "*" :truncate-lines :prompt projectile-prepend-project-name "Switch to project: "] 11 (#$ . 31207) "P"])
212 #@123 Use projectile with Helm for finding files in project
213
214 With a prefix ARG invalidates the cache first.
215
216 (fn &optional ARG)
217 (defalias 'helm-projectile-find-file #[256 "\304 \203\f\305!\210\202\306\307!\210\310\211\311\312\n\313\314\315 \316Q\317 \320\321\322!&*\207" [helm-boring-file-regexp-list helm-ff-transformer-show-only-basename helm-source-projectile-files-and-dired-list helm-projectile-truncate-lines projectile-project-p projectile-maybe-invalidate-cache error "You're not in a project" nil helm :sources :buffer "*helm projectile: " projectile-project-name "*" :truncate-lines :prompt projectile-prepend-project-name "Find file: "] 11 (#$ . 31837) "P"])
218 #@123 Use projectile with Helm for finding files in project
219
220 With a prefix ARG invalidates the cache first.
221
222 (fn &optional ARG)
223 (defalias 'helm-projectile-find-file-in-known-projects #[256 "\303 \203    \304!\210\305\211\306\307\310\311\312\313 \314Q\315\n\316\317\320!&*\207" [helm-boring-file-regexp-list helm-ff-transformer-show-only-basename helm-projectile-truncate-lines projectile-project-p projectile-maybe-invalidate-cache nil helm :sources helm-source-projectile-files-in-all-projects-list :buffer "*helm projectile: " projectile-project-name "*" :truncate-lines :prompt projectile-prepend-project-name "Find file in projects: "] 11 (#$ . 32515) "P"])
224 #@123 Use projectile with Helm for finding files in project
225
226 With a prefix ARG invalidates the cache first.
227
228 (fn &optional ARG)
229 (defalias 'helm-projectile-find-dir #[256 "\304 \203\f\305!\210\202\306\307!\210\310\211\311\312\n\313\314\315 \316Q\317 \320\321\322!&*\207" [helm-boring-file-regexp-list helm-ff-transformer-show-only-basename helm-source-projectile-directories-and-dired-list helm-projectile-truncate-lines projectile-project-p projectile-maybe-invalidate-cache error "You're not in a project" nil helm :sources :buffer "*helm projectile: " projectile-project-name "*" :truncate-lines :prompt projectile-prepend-project-name "Find dir: "] 11 (#$ . 33180) "P"])
230 #@123 Use projectile with Helm for finding files in project
231
232 With a prefix ARG invalidates the cache first.
233
234 (fn &optional ARG)
235 (defalias 'helm-projectile-recentf #[256 "\303 \203\f\304!\210\202\305\306!\210\307\211\310\311\312\313\314\315 \316Q\317\n\320\321\322!&*\207" [helm-boring-file-regexp-list helm-ff-transformer-show-only-basename helm-projectile-truncate-lines projectile-project-p projectile-maybe-invalidate-cache error "You're not in a project" nil helm :sources helm-source-projectile-recentf-list :buffer "*helm projectile: " projectile-project-name "*" :truncate-lines :prompt projectile-prepend-project-name "Recently visited file: "] 11 (#$ . 33862) "P"])
236 #@123 Use projectile with Helm for finding files in project
237
238 With a prefix ARG invalidates the cache first.
239
240 (fn &optional ARG)
241 (defalias 'helm-projectile-switch-to-buffer #[256 "\303 \203\f\304!\210\202\305\306!\210\307\211\310\311\312\313\314\315 \316Q\317\n\320\321\322!&*\207" [helm-boring-file-regexp-list helm-ff-transformer-show-only-basename helm-buffers-truncate-lines projectile-project-p projectile-maybe-invalidate-cache error "You're not in a project" nil helm :sources helm-source-projectile-buffers-list :buffer "*helm projectile: " projectile-project-name "*" :truncate-lines :prompt projectile-prepend-project-name "Switch to buffer: "] 11 (#$ . 34545) "P"])
242 #@123 Use projectile with Helm for finding files in project
243
244 With a prefix ARG invalidates the cache first.
245
246 (fn &optional ARG)
247 (defalias 'helm-projectile-browse-dirty-projects #[256 "\303 \203    \304!\210\305\211\306\307\310\311\312\313 \314Q\315\n\316\317\320!&*\207" [helm-boring-file-regexp-list helm-ff-transformer-show-only-basename helm-projectile-truncate-lines projectile-project-p projectile-maybe-invalidate-cache nil helm :sources helm-source-projectile-dirty-projects :buffer "*helm projectile: " projectile-project-name "*" :truncate-lines :prompt projectile-prepend-project-name "Select a project: "] 11 (#$ . 35229) "P"])
248 #@128 Create (DISPLAY . REAL) pairs with FILES and ROOT.
249
250   DISPLAY is the short file name.  REAL is the full path.
251
252 (fn FILES ROOT)
253 (defalias 'helm-projectile--files-display-real #[514 "\300\211:\203@\262\301\"BB\262A\262\202\211\237\207" [nil expand-file-name] 9 (#$ . 35871)])
254 #@38 Find file at point based on context.
255 (defalias 'helm-projectile-find-file-dwim #[0 "\306 \307 \310!\211G\311U\203\312\313@\306 \"!\202R\314\315\316\317\320\321G\311V\2030\322\n\"\2026\322\n\"\323\324\325\326    \327\n\330 \331\f\332\333\334\335&\336\337\340 \341\342\343!&\207" [helm-projectile-fuzzy-match helm-projectile-find-file-map helm-ff-help-message helm-read-file-name-mode-line-string helm-projectile-file-actions helm-projectile-truncate-lines projectile-project-root projectile-current-project-files projectile-select-files 1 find-file expand-file-name helm :sources helm-make-source "Projectile files" helm-source-sync :candidates helm-projectile--files-display-real :fuzzy-match :action-transformer helm-find-files-action-transformer :keymap :help-message :mode-line :action :persistent-action helm-projectile-file-persistent-action :persistent-help "Preview file" :buffer "*helm projectile*" :truncate-lines :prompt projectile-prepend-project-name "Find file: "] 26 (#$ . 36167) nil])
256 #@277 Switch between files with the same name but different extensions using Helm.
257 With FLEX-MATCHING, match any file that contains the base name of current file.
258 Other file extensions can be customized with the variable `projectile-other-file-alist'.
259
260 (fn &optional FLEX-MATCHING)
261 (defalias 'helm-projectile-find-other-file #[256 "\306 \307\310 \311 #\211\203H\211G\312U\203\313\314@\"!\202K\315\316\317\320\321\322\323\324    \"\325    \326\n\327 \330\f\331\332\333\334&\335\336\337 \340\341\342!&)\202K\343\344!\207" [helm-ff-transformer-show-only-basename helm-projectile-find-file-map helm-ff-help-message helm-read-file-name-mode-line-string helm-projectile-file-actions helm-projectile-truncate-lines projectile-project-root projectile-get-other-files buffer-file-name projectile-current-project-files 1 find-file expand-file-name nil helm :sources helm-make-source "Projectile other files" helm-source-sync :candidates helm-projectile--files-display-real :keymap :help-message :mode-line :action :persistent-action helm-projectile-file-persistent-action :persistent-help "Preview file" :buffer "*helm projectile*" :truncate-lines :prompt projectile-prepend-project-name "Find other file: " error "No other file found"] 22 (#$ . 37189) "P"])
262 (byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\300\312\302\303\313DD\314\310\311\306\315&\207" [custom-declare-variable helm-projectile-grep-or-ack-actions funcall function #[0 "\300\207" [("Find file" helm-grep-action "Find file other frame" helm-grep-other-frame (lambda nil (and (locate-library "elscreen") "Find file in Elscreen")) helm-grep-jump-elscreen "Save results in grep buffer" helm-grep-save-results "Find file other window" helm-grep-other-window)] 1] "Available actions for `helm-projectile-grep-or-ack'.\nThe contents of this list are passed as the arguments to `helm-make-actions'." :type symbol :group helm-projectile helm-projectile-set-input-automatically #[0 "\300\207" [t] 1] "If non-nil, attempt to set search input automatically.\nAutomatic input selection uses the region (if there is an active\nregion), otherwise it uses the current symbol at point (if there\nis one).  Applies to `helm-projectile-grep' and\n`helm-projectile-ack' only.  If the `helm-ag' package is\ninstalled, then automatic input behavior for `helm-projectile-ag'\ncan be customized using `helm-ag-insert-at-point'." boolean] 8)
263 #@393 Perform helm-grep at project root.
264 DIR directory where to search
265 USE-ACK-P indicates whether to use ack or not.
266 ACK-IGNORED-PATTERN is a file regex to exclude from searching.
267 ACK-EXECUTABLE is the actual ack binary name.
268 It is usually "ack" or "ack-grep".
269 If it is nil, or ack/ack-grep not found then use default grep command.
270
271 (fn &optional DIR USE-ACK-P ACK-IGNORED-PATTERN ACK-EXECUTABLE)
272 (defalias 'helm-projectile-grep-or-ack #[1024 "\206\306 \211\307\310\311  \"\310\312\313\314 \" \"@\203'\211\315\316R\2028A\2037\317 \320=\2037\321\2028\322\211BC\323\324\325\307!!\326\327\330\331\332\333\334 !\335\"\336\337%\340\341\342\343\344\345\346\307\347D\350\351\352\353\354E\"\355\356\357\360\361\362&5\363\364\365\366F\205\211\367 \203\206\370\371 \372 \"\202\211\373\374!\375\376\377\n\203\227\201H\202\232\201I\"\201J\347D\350\351\201KG&.\207" [default-directory helm-ff-default-directory helm-grep-in-recurse grep-find-ignored-files helm-grep-ignored-files grep-find-ignored-directories projectile-project-root t cl-union projectile-ignored-files-rel mapcar directory-file-name projectile-ignored-directories-rel " -H --no-group --no-color " " %p %f" projectile-project-vcs git "git --no-pager grep --no-color -n%c -e %p -- %f" "grep -a -r %e -n%cH -e %p %f ." helm-make-source capitalize helm-grep-command helm-source-async :header-name make-byte-code 257 "\300\203\301\202    \302\211\303\304Q\207" vconcat vector ["Helm Projectile Ack" "Helm Projectile Grep" " " "(C-c ? Help)"] 5 "\n\n(fn NAME)" :candidates-process helm-grep-collect-candidates :filter-one-by-one helm-grep-filter-one-by-one :candidate-number-limit 9999 :nohighlight :keymap :history helm-grep-history :action apply helm-make-actions :persistent-action helm-grep-persistent-action :persistent-help "Jump to line (`C-u' Record in mark ring)" :requires-pattern 2 helm :sources helm-source-grep :input region-active-p buffer-substring-no-properties region-beginning region-end thing-at-point symbol :buffer format "*helm %s*" helm-grep-ignored-directories projectile-use-git-grep helm-grep-default-command helm-grep-default-recurse-command helm-grep-map helm-projectile-grep-or-ack-actions helm-projectile-set-input-automatically helm-grep-truncate-lines "ack" "grep" :default-directory :truncate-lines] 30 (#$ . 39587)])
273 #@41 Turn on `helm-projectile' key bindings.
274 (defalias 'helm-projectile-on #[0 "\300\301!\210\302\303!\207" [message "Turn on helm-projectile key bindings" helm-projectile-toggle 1] 2 (#$ . 41927) nil])
275 #@42 Turn off `helm-projectile' key bindings.
276 (defalias 'helm-projectile-off #[0 "\300\301!\210\302\303!\207" [message "Turn off helm-projectile key bindings" helm-projectile-toggle -1] 2 (#$ . 42131) nil])
277 #@123 Helm version of `projectile-grep'.
278 DIR is the project root, if not set then current directory is used
279
280 (fn &optional DIR)
281 (defalias 'helm-projectile-grep #[256 "\211\206\f\300 \206\f\301\302!\303\304\305\306\305%\207" [projectile-project-root error "You're not in a project" run-with-timer 0.01 nil helm-projectile-grep-or-ack] 8 (#$ . 42340) nil])
282 #@53 Helm version of projectile-ack.
283
284 (fn &optional DIR)
285 (defalias 'helm-projectile-ack #[256 "\211\206\f\300 \206\f\301\302!\303\304\305\306\307\310 \"\306\311\312\313 \314 \"\"\"\315#\316\317!\203*\317\2027\316\320!\2034\320\2027\301\321!\322\323\324\325\326&\266\202\207" [projectile-project-root error "You're not in a project" mapconcat identity cl-union mapcar #[257 "\300\301\302!!P\207" ["--ignore-dir=" file-name-nondirectory directory-file-name] 5 "\n\n(fn PATH)"] projectile-ignored-directories #[257 "\300\301!P\207" ["--ignore-file=match:" shell-quote-argument] 4 "\n\n(fn PATH)"] append projectile-ignored-files projectile-patterns-to-ignore " " executable-find "ack" "ack-grep" "ack or ack-grep is not available" run-with-timer 0.01 nil helm-projectile-grep-or-ack t] 12 (#$ . 42698) nil])
286 #@58 Helm version of `projectile-ag'.
287
288 (fn &optional OPTIONS)
289 (defalias 'helm-projectile-ag #[256 "\304\305\306\307#\203<\310 \2038\311\312 \"\311\313     \"\314\315\316    \317 A@#\320#\n\320\320\260\306\321\322 \317 @\",\207\323\324!\207\325\326!\205S\3271O\330\305!\210\331!0\207\210\323\332!\207" [grep-find-ignored-files grep-find-ignored-directories helm-ag-base-command current-prefix-arg require helm-ag nil t projectile-project-p cl-union projectile-ignored-files-rel projectile-ignored-directories-rel mapconcat #[257 "\300P\207" ["--ignore "] 3 "\n\n(fn I)"] append projectile-parse-dirconfig-file " " helm-do-ag projectile-project-root error "You're not in a project" yes-or-no-p "`helm-ag' is not installed. Install? " (error) package-install helm-projectile-ag "`helm-ag' is not available.  Is MELPA in your `package-archives'?"] 7 (#$ . 43519) (byte-code "\205\n\301\302\303\304#C\207" [current-prefix-arg helm-read-string "option: " "" helm-ag--extra-options-history] 4)])
290 (defalias 'helm-projectile-rg--region-selection #[0 "\300 \205 \301\302 \303 \"\207" [use-region-p buffer-substring-no-properties region-beginning region-end] 3])
291 #@34 Projectile version of `helm-rg'.
292 (defalias 'helm-projectile-rg #[0 "\302\303\304\305#\203#\306 \203\304\305\303\307 \206\310\304\311 C#*\207\312\313!\207\314\315!\2057\31615\317\303!\210\320 0\207\210\321\207" [helm-rg-include-file-on-every-match-line helm-rg-prepend-file-name-line-at-top-of-matches require helm-rg nil t projectile-project-p helm-projectile-rg--region-selection "" projectile-project-root error "You're not in a project" yes-or-no-p "`helm-rg' is not installed. Install? " (error) package-install helm-projectile-rg "`helm-rg' is not available.  Is MELPA in your `package-archives'?"] 4 (#$ . 44684) nil])
293 (defalias 'helm-projectile-commander-bindings #[0 "\301\302\303\304\305E\306\303\"B!\307\"\301\302\310\311\312E\306\310\"B!\313\"\301\302\314\315\316E\306\314\"B!\317\"\301\302\320\321\322E\306\320\"B!\323\"\301\302\324\325\326E\306\324\"B!\327\"\301\302\330\331\332E\306\330\"B!\333\"\301\302\334\335\336E\306\334\"B!\337\"\301\302\340\341\342E\306\340\"B!\343\"\301\302\344\345\346E\306\344\"B!\347\"\211\207" [projectile-commander-methods cl-sort copy-sequence 97 "Run ack on project." #[0 "\300\301!\207" [call-interactively helm-projectile-ack] 2] assq-delete-all #[514 "@@W\207" #1=[] 4 "\n\n(fn A B)"] 65 "Find ag on project." #[0 "\300\301!\207" [call-interactively helm-projectile-ag] 2] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"] 102 "Find file in project." #[0 "\300 \207" [helm-projectile-find-file] 1] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"] 98 "Switch to project buffer." #[0 "\300 \207" [helm-projectile-switch-to-buffer] 1] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"] 100 "Find directory in project." #[0 "\300 \207" [helm-projectile-find-dir] 1] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"] 103 "Run grep on project." #[0 "\300 \207" [helm-projectile-grep] 1] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"] 115 "Switch project." #[0 "\300 \207" [helm-projectile-switch-project] 1] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"] 101 "Find recently visited file in project." #[0 "\300 \207" [helm-projectile-recentf] 1] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"] 86 "Find dirty projects." #[0 "\300 \207" [helm-projectile-browse-dirty-projects] 1] #[514 "@@W\207" #1# 4 "\n\n(fn A B)"]] 6])
294 #@58 Toggle Helm version of Projectile commands.
295
296 (fn TOGGLE)
297 (defalias 'helm-projectile-toggle #[257 "\211\302V\203_\303=\203\304\305    \306\307#\210\305    \310\304#\210\305    \311\312#\210\305    \313\314#\210\305    \315\316#\210\305    \317\320#\210\305    \321\322#\210\305    \323\324#\210\305    \325\326#\210\305    \327\330#\210\305    \331\332#\210\305    \333\334#\210\305    \335\336#\210\337 \207\304=\203g\303\305    \340\341#\210\305    \342\341#\210\305    \343\341#\210\305    \344\341#\210\305    \345\341#\210\305    \346\341#\210\305    \347\341#\210\305    \350\341#\210\305    \351\341#\210\305    \352\341#\210\305    \353\341#\210\305    \354\341#\210\355 \207" [projectile-switch-project-action projectile-mode-map 0 projectile-find-file helm-projectile-find-file define-key [remap projectile-find-other-file] helm-projectile-find-other-file [remap projectile-find-file] [remap projectile-find-file-in-known-projects] helm-projectile-find-file-in-known-projects [remap projectile-find-file-dwim] helm-projectile-find-file-dwim [remap projectile-find-dir] helm-projectile-find-dir [remap projectile-switch-project] helm-projectile-switch-project [remap projectile-recentf] helm-projectile-recentf [remap projectile-switch-to-buffer] helm-projectile-switch-to-buffer [remap projectile-grep] helm-projectile-grep [remap projectile-ack] helm-projectile-ack [remap projectile-ag] helm-projectile-ag [remap projectile-ripgrep] helm-projectile-rg [remap projectile-browse-dirty-projects] helm-projectile-browse-dirty-projects helm-projectile-commander-bindings [remap projectile-find-other-file] nil [remap projectile-find-file] [remap projectile-find-file-in-known-projects] [remap projectile-find-file-dwim] [remap projectile-find-dir] [remap projectile-switch-project] [remap projectile-recentf] [remap projectile-switch-to-buffer] [remap projectile-grep] [remap projectile-ag] [remap projectile-ripgrep] [remap projectile-browse-dirty-projects] projectile-commander-bindings] 5 (#$ . 46923)])
298 #@186 Use projectile with Helm instead of ido.
299
300 With a prefix ARG invalidates the cache first.
301 If invoked outside of a project, displays a list of known projects to jump.
302
303 (fn &optional ARG)
304 (defalias 'helm-projectile #[256 "\303 \204    \304!\207\305!\210\306\307\310    \311\312\313\n\314\315\303 \203!\316\202\"\317!&)\207" [helm-ff-transformer-show-only-basename helm-projectile-sources-list helm-projectile-truncate-lines projectile-project-p helm-projectile-switch-project projectile-maybe-invalidate-cache nil helm :sources :buffer "*helm projectile*" :truncate-lines :prompt projectile-prepend-project-name "pattern: " "Switch to project: "] 11 (#$ . 48876) "P"])
305 (byte-code "\300\301\302\"\210\303\304!\207" [eval-after-load projectile #[0 "\301\302\303#\207" [projectile-command-map define-key "h" helm-projectile] 4] provide helm-projectile] 3)