;ELC��� ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302\303\304#\210\300\305!\210\300\306!\210\300\307!\207" [require helm helm-match-plugin nil t helm-elisp auto-complete popup] 4) #@81 Select `auto-complete' candidates by `helm'. It is useful to narrow candidates. (defalias 'ac-complete-with-helm #[nil "\205B�\306\216 \203;�\307\310C\n\"\311=\203�\312\202�\313\211\314\315\206(�\316\"\210\317\"\210\320\321\322\323\324$,\202A�\320\321\322\323\324$)\207" [ac-completing helm-turn-on-show-completion helm-move-selection-after-hook helm-split-window-default-side helm-reuse-last-window-split-state helm-split-window-inside-p #[nil "\205 �\301!\205 �\302!\207" [helm-show-completion-overlay overlayp delete-overlay] 2] append helm-show-completion same below nil helm-set-local-variable helm-display-function helm-default-display-buffer helm-show-completion-init-overlay helm :sources helm-source-auto-complete-candidates :buffer "*helm auto-complete*" helm-show-completion-display-function ac-point ac-last-point] 5 (#$ . 247) nil]) (defalias 'helm-auto-complete-init #[nil "\302\300\"\210\302\303\304!\"\210\302\301 \"\210\305 \207" [ac-candidates ac-prefix helm-attrset menu-width popup-preferred-width ac-cleanup] 4]) (defalias 'helm-auto-complete-action #[(string) "\302\303\304!G[!\210c\210\305\306\301#\211\205� )\307\310\311\"\210\207" [string action delete-char helm-attr ac-prefix get-text-property 0 helm-attrset ac-candidates nil] 5]) (defalias 'helm-auto-complete-candidates #[nil "\305 \n\306\307!\310\311\312 #\211\203#�\313\314 \315\306\316! GZ\317\"\f$\202$� ) B&\207" [for x in collect it loop helm-attr ac-candidates get-text-property 0 action format "%s%s <%s>" make-string menu-width 32] 13]) (defvar helm-source-auto-complete-candidates '((name . "Auto Complete") (init . helm-auto-complete-init) (candidates . helm-auto-complete-candidates) (action . helm-auto-complete-action) (persistent-action . popup-item-show-help) (ac-candidates) (menu-width))) (provide 'ac-helm)