2019-10-09 20:36:55 +02:00
|
|
|
|
;ELC
|
|
|
|
|
|
;;; Compiled
|
2019-10-27 19:05:34 +01:00
|
|
|
|
;;; in Emacs version 26.3
|
2019-10-09 20:36:55 +02:00
|
|
|
|
;;; 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\300\304!\210\305\306\307\310\311\302%\210\312\313\314\315\316DD\317\311\306\320\321&\210\312\322\314\315\323DD\324\311\306\320\325&\207" [require cl-lib helm helm-help package custom-declare-group helm-el-package nil "helm elisp packages." :group custom-declare-variable helm-el-package-initial-filter funcall function #[0 "\300\207" [all] 1] "Show only installed, upgraded or all packages at startup." :type (radio :tag "Initial filter for elisp packages" (const :tag "Show all packages" all) (const :tag "Show installed packages" installed) (const :tag "Show not installed packages" uninstalled) (const :tag "Show upgradable packages" upgrade)) helm-el-truncate-lines #[0 "\300\207" [t] 1] "Truncate lines in helm-buffer when non--nil." boolean] 8)
|
|
|
|
|
|
(defvar helm-el-package--show-only 'all)
|
|
|
|
|
|
(defvar helm-el-package--initialized-p nil)
|
|
|
|
|
|
(defvar helm-el-package--tabulated-list nil)
|
|
|
|
|
|
(defvar helm-el-package--upgrades nil)
|
|
|
|
|
|
(defvar helm-el-package--removable-packages nil)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package--init #[0 "\204
\306\307!\203
\310 \210\311\312 \204 \313\314 \211\203! \315 \210\316\216\317 r\320\321\322\323\324!\325\"\326$\216*\203= \327 \210\202K +\203F \330\331!\210\332*!\210\312*\330\311!\210*\210\333\334r\335\336!q\210,-\337ed\340#\210eb\210\341\342\311\312#\203x \343\344!\210\202i \345 )\"\210\346 .+\203\232 .\203\224 \330\347.G\"\202\247 \330\350!\202\247 .\203\243 \351\202\245 /\211+\207" [package--initialized inhibit-read-only package-menu-async package-alist helm-el-package--show-only helm-el-package--removable-packages boundp package-quickstart package-initialize nil t all package--removable-packages package-autoremove #[0 "\300\301!\207" [kill-buffer "*Packages*"] 2] internal--before-save-selected-window make-byte-code 0 "\301\300!\207" vconcat vector [internal--after-save-selected-window] 2 package-show-package-list message "Refreshing packages list..." list-packages helm-init-candidates-in-buffer global get-buffer "*Packages*" remove-text-properties (read-only button follow-link category) re-search-forward "^[ ]+" replace-match "" buffer-string helm-el-package-menu--find-upgrades "Refreshing packages list done, [%d] package(s) to upgrade" "Refreshing packages list done, no upgrades available" upgrade helm-el-package--initialized-p helm--force-updating-p tabulated-list-entries helm-el-package--tabulated-list helm-el-package--upgrades helm-el-package-initial-filter] 7])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@18
|
|
|
|
|
|
|
|
|
|
|
|
(fn CANDIDATE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-describe #[257 "\301\302\303#\304\305!>\204 \306\307\310D\"\210\311H!\207" [cl-struct-package-desc-tags get-text-property 0 tabulated-list-id describe-package type-of signal wrong-type-argument package-desc 1] 7 (#$ . 2892)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@18
|
|
|
|
|
|
|
|
|
|
|
|
(fn CANDIDATE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-visit-homepage #[257 "\302\303\304#\305!>\204 \306\307\310D\"\210\211\311H\312 \"A@\305!>\204, \306\307\310D\"\210\211\313H\211<\2059 \312\314\"\243\211;\203D \315!\202O \316\317\320\321!\322\323#\"\207" [cl-struct-package-desc-tags package-archive-contents get-text-property 0 tabulated-list-id type-of signal wrong-type-argument package-desc 1 assoc 8 :url browse-url message "Package %s has no homepage" propertize symbol-name face font-lock-keyword-face] 12 (#$ . 3174)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-run-visit-homepage #[0 "\203 \301\302!\207\303\304!\207" [helm-alive-p helm-exit-and-execute-action helm-el-package-visit-homepage error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-run-visit-homepage 'helm-only t)
|
|
|
|
|
|
#@12
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-elisp-package--pkg-name #[257 "\301!>\203 \301!>\204 \302\303\304D\"\210\211\305H\207\207" [cl-struct-package-desc-tags type-of signal wrong-type-argument package-desc 1] 5 (#$ . 3973)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@17
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG-LIST)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-install-1 #[257 "\211\211\303\211\211\211:\203f @\262\304\305\306#\262\307!\262\310\311\"\210\236\211\205H \211A@\312! >\204: \313\314\315D\"\210\211\316H\262\211\205F \317!\262\262\203_ \211C\244\262\320!\204_ \321\nB!\210A\262\202 \322\323\324G\325\326\327##!\210\303\207" [package-alist cl-struct-package-desc-tags package-selected-packages nil get-text-property 0 tabulated-list-id helm-elisp-package--pkg-name package-install t type-of signal wrong-type-argument package-desc 7 file-exists-p package--user-selected-p package--save-selected-packages message format "%d packages installed:\n(%s)" mapconcat package-desc-full-name ", "] 15 (#$ . 4200)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@18
|
|
|
|
|
|
|
|
|
|
|
|
(fn CANDIDATE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-install #[257 "\300\301 !\207" [helm-el-package-install-1 helm-marked-candidates] 3 (#$ . 4932)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-run-package-install #[0 "\203 \301\302!\207\303\304!\207" [helm-alive-p helm-exit-and-execute-action helm-el-package-install error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-run-package-install 'helm-only t)
|
|
|
|
|
|
#@33
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG-LIST &optional FORCE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-uninstall-1 #[513 "\211\302\211\211:\203O @\262\303\304\305#\262\3061\" \307\"0\202) \310A@!\262\210\311\312!>\204: \313\314\315D\"\210\316H \"\204H \211C\244\262A\262\202 \211\203a \310\317\320G\321\322\323##!\210\302\207" [cl-struct-package-desc-tags package-alist nil get-text-property 0 tabulated-list-id (debug error) package-delete message assoc type-of signal wrong-type-argument package-desc 1 format "%d packages deleted:\n(%s)" mapconcat package-desc-full-name ", "] 15 (#$ . 5335)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@18
|
|
|
|
|
|
|
|
|
|
|
|
(fn CANDIDATE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-uninstall #[257 "\301\302 \"\207" [helm-current-prefix-arg helm-el-package-uninstall-1 helm-marked-candidates] 4 (#$ . 5917)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-run-package-uninstall #[0 "\203 \301\302!\207\303\304!\207" [helm-alive-p helm-exit-and-execute-action helm-el-package-uninstall error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-run-package-uninstall 'helm-only t)
|
|
|
|
|
|
(defalias 'helm-el-package-menu--find-upgrades #[0 "\302\211\211\211\211\211\211:\203q @\262@\262\303!\262\304\230\203+ C\244\262\305!\2039 C\244\262\306\235\203F C\244\262\307\235\203i \211\310! >\204^ \311\312\313 D\"\210\314HBC\244\262A\262\202 \315#\211\302\211\211\211:\203\335 @\262\310! >\204\224 \311\312\313D\"\210\314H\262\236\262\203\326 \316\310! >\204\264 \311\312\313D\"\210\317H\310A! >\204\311 \311\312\313AD\"\210A\317H\"\203\326 B\262A\262\202{ \211\237\266\206\207" [helm-el-package--tabulated-list cl-struct-package-desc-tags nil package-desc-status "dependency" package--used-elsewhere-p ("installed" "unsigned") ("available" "new") type-of signal wrong-type-argument package-desc 1 append version-list-< 2] 20])
|
|
|
|
|
|
#@70 Return non-nil if PACKAGE is a user-installed package.
|
|
|
|
|
|
|
|
|
|
|
|
(fn PACKAGE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package--user-installed-p #[257 "\211\236\211\205\n \211A@\211\205 \303! >\204 \304\305\306D\"\210\211\307H\211\205( \310\n\"\207" [package-alist cl-struct-package-desc-tags package-user-dir type-of signal wrong-type-argument package-desc 7 file-in-directory-p] 7 (#$ . 7160)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@17
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG-LIST)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-upgrade-1 #[257 "\211\302\211\211\211:\203[ @\262@\262\303!>\204! \304\305\306D\"\210\307H\262 \236A\262\232\203? \310\311\"\210\312\313\"\210\202T \211\203T \314!\204T \310\315\"\210\316\313\211#\210A\262\202 \302\207" [cl-struct-package-desc-tags helm-el-package--upgrades nil type-of signal wrong-type-argument package-desc 1 message "Installing package `%s'" package-install t package-built-in-p "Deleting package `%s'" package-delete] 10 (#$ . 7538)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@18
|
|
|
|
|
|
|
|
|
|
|
|
(fn CANDIDATE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-upgrade #[257 "\302\303 \304\211\211:\2039 @\262@\262\305\306! >\204$ \307\310\311D\"\210\312H!\235\2032 B\262A\262\202 \211\237\266\205!\207" [helm-el-package--tabulated-list cl-struct-package-desc-tags helm-el-package-upgrade-1 helm-marked-candidates nil symbol-name type-of signal wrong-type-argument package-desc 1] 12 (#$ . 8066)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-run-package-upgrade #[0 "\203 \301\302!\207\303\304!\207" [helm-alive-p helm-exit-and-execute-action helm-el-package-upgrade error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-run-package-upgrade 'helm-only t)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-upgrade-all #[0 "\203a \306 !\307 \310=\203 \311\202 \312\211 \312Crq\210\313\314\315\316\"\317\320#!\210)\321\322\323\324\325!\326\"\327$\216\330\331\332\"\240!r\321\322\333\324\325!\334\"\335$\216\336@\337\"\210\340\341!\205\\ \342%!*\262-\207\343\344!\207" [helm-el-package--upgrades helm-marked-buffer-name helm-always-two-windows helm-split-window-default-side helm-split-window-inside-p helm-reuse-last-window-split-state temp-buffer-window-setup t same below nil helm-format-columns-of-files helm-fast-remove-dups mapcar #[257 "\300@!\207" [symbol-name] 3 "\n\n(fn X)"] :test equal 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 "Upgrade all packages? " helm-el-package-upgrade-1 message "No packages to upgrade actually!" helm-el-package--tabulated-list] 10])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@18
|
|
|
|
|
|
|
|
|
|
|
|
(fn CANDIDATE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-upgrade-all-action #[257 "\300 \207" [helm-el-package-upgrade-all] 2 (#$ . 9789)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-run-package-upgrade-all #[0 "\203 \301\302!\207\303\304!\207" [helm-alive-p helm-exit-and-execute-action helm-el-package-upgrade-all-action error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-run-package-upgrade-all 'helm-only t)
|
|
|
|
|
|
#@26
|
|
|
|
|
|
|
|
|
|
|
|
(fn CANDIDATES SOURCE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package--transformer #[514 "\305\211\211\211\211\211\211\211\211\211\211 :\203\375 @\262 \306 P\262\n\307\310\311
#\262 \205? \312 !>\204; \313\314\315 D\"\210\316H\262\317 !\262\320!\205S \321\235?\262\322\235\262 \236\262\n>\262\203x \204x \323\310\324\325\326%\210 >\204\207 \203\237 \203\237 \323\310\324\325\327%\210\323\324\330\n!G\324\\\331\332%\210\203\264 \204\264 \204\264 \323\310\324\325\333%\210 \334 !@B\262\203\310 \f\335=\204\360 \203\322 \f\336=\204\360 \203\334 \f\337=\204\360 \204\352 \204\352 \f\340=\204\360 \f\341=\203\365 B\262 A\262\f\202\f \211\237\207" [cl-struct-package-desc-tags helm-el-package--upgrades package-selected-packages helm-el-package--removable-packages helm-el-package--show-only nil " " get-text-property 0 tabulated-list-id type-of signal wrong-type-argument package-desc 1 package-desc-status package-built-in-p ("available" "new" "installed" "dependency") ("installed" "dependency") put-text-property 2 display "S " "U " symbol-name face font-lock-variable-name-face "I " split-string built-in upgrade installed uninstalled all] 20 (#$ . 10196)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-package-show-built-in #[0 "\203 \302\303 \207\304\305!\207" [helm-alive-p helm-el-package--show-only built-in helm-update error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-package-show-built-in 'helm-only t)
|
|
|
|
|
|
(defalias 'helm-el-package-show-upgrade #[0 "\203 \302\303 \207\304\305!\207" [helm-alive-p helm-el-package--show-only upgrade helm-update error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-package-show-upgrade 'helm-only t)
|
|
|
|
|
|
(defalias 'helm-el-package-show-installed #[0 "\203 \302\303 \207\304\305!\207" [helm-alive-p helm-el-package--show-only installed helm-update error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-package-show-installed 'helm-only t)
|
|
|
|
|
|
(defalias 'helm-el-package-show-all #[0 "\203 \302\303 \207\304\305!\207" [helm-alive-p helm-el-package--show-only all helm-update error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-package-show-all 'helm-only t)
|
|
|
|
|
|
(defalias 'helm-el-package-show-uninstalled #[0 "\203 \302\303 \207\304\305!\207" [helm-alive-p helm-el-package--show-only uninstalled helm-update error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-package-show-uninstalled 'helm-only t)
|
|
|
|
|
|
(defvar helm-el-package-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\303\324\325#\210\303\326\327#\210\303\330\331#\210\211\207" [helm-map make-sparse-keymap set-keymap-parent define-key [134217801] helm-el-package-show-installed [134217807] helm-el-package-show-uninstalled [134217813] helm-el-package-show-upgrade [134217794] helm-el-package-show-built-in [134217793] helm-el-package-show-all "i" helm-el-run-package-install "r" helm-el-run-package-reinstall "d" helm-el-run-package-uninstall "u" helm-el-run-package-upgrade "U" helm-el-run-package-upgrade-all "@" helm-el-run-visit-homepage] 5))
|
|
|
|
|
|
(defvar helm-source-list-el-package nil)
|
|
|
|
|
|
(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-list-el-package-source-p eieio-make-class-predicate helm-list-el-package-source helm-list-el-package-source--eieio-childp eieio-make-child-predicate helm-list-el-package-source-child-p make-obsolete "use (cl-typep ... \\='helm-list-el-package-source) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (helm-source-in-buffer) ((init :initform 'helm-el-package--init) (get-line :initform 'buffer-substring) (filtered-candidate-transformer :initform 'helm-el-package--transformer) (action-transformer :initform 'helm-el-package--action-transformer) (help-message :initform 'helm-el-package-help-message) (keymap :initform helm-el-package-map) (update :initform 'helm-el-package--update) (candidate-number-limit :initform 9999) (action :initform '(("Describe package" . helm-el-package-describe) ("Visit homepage" . helm-el-package-visit-homepage))) (group :initform 'helm-el-package)) nil] 6)
|
|
|
|
|
|
#@84 Create a new object of class type `helm-list-el-package-source'.
|
|
|
|
|
|
|
|
|
|
|
|
(fn &rest SLOTS)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-list-el-package-source #[128 "\300\301\302#\207" [apply make-instance helm-list-el-package-source] 5 (#$ . 14529)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(byte-code "\300\301\302\303#\300\207" [function-put helm-list-el-package-source compiler-macro helm-list-el-package-source--anon-cmacro] 4)
|
|
|
|
|
|
#@26
|
|
|
|
|
|
|
|
|
|
|
|
(fn WHOLE &rest SLOTS)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-list-el-package-source--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 (#$ . 14892)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@26
|
|
|
|
|
|
|
|
|
|
|
|
(fn ACTIONS CANDIDATE)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package--action-transformer #[514 "\303\304\305#\306!\307!>\204 \310\311\312D\"\210\313H\314!\205$ \315\235? \2030 \316\317\"\2021 \2039 \320\202\220 \321!\203S \236A\203S \322\235\203S \316\323\"\202\220 \321!\203m \236A\203m \324\230\203m \316\325\"\202\220 \321!\203\214 \314!\203\205 \314!\203\214 \n\236\203\214 \316\326\"\202\220 \316\327\"\207" [cl-struct-package-desc-tags helm-el-package--upgrades package-alist get-text-property 0 tabulated-list-id package-desc-status type-of signal wrong-type-argument package-desc 1 package-built-in-p ("available" "new" "installed" "dependency") append (("Upgrade all packages" . helm-el-package-upgrade-all-action)) (("Describe package" . helm-el-package-describe)) package-installed-p ("installed" "dependency") (("Upgrade package(s)" . helm-el-package-upgrade) ("Uninstall package(s)" . helm-el-package-uninstall)) "available" (("Upgrade package(s)" . helm-el-package-upgrade)) (("Reinstall package(s)" . helm-el-package-reinstall) ("Recompile package(s)" . helm-el-package-recompile) ("Uninstall package(s)" . helm-el-package-uninstall)) (("Install packages(s)" . helm-el-package-install))] 10 (#$ . 15139)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-package--update #[0 "\301\211\207" [helm-el-package--initialized-p nil] 2])
|
|
|
|
|
|
#@12
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-recompile #[257 "\300 \301:\203 @\262\302!\210A\262\202 \301\207" [helm-marked-candidates nil helm-el-package-recompile-1] 5 (#$ . 16474)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@12
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-recompile-1 #[257 "\301\302\303#\304!>\204 \305\306\307D\"\210\211\310H\311!\207" [cl-struct-package-desc-tags get-text-property 0 tabulated-list-id type-of signal wrong-type-argument package-desc 7 async-byte-recompile-directory] 6 (#$ . 16666)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@12
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-reinstall #[257 "\300 \301\211:\203 @\262\302\303\304#\262\305!\210A\262\202 \301\207" [helm-marked-candidates nil get-text-property 0 tabulated-list-id helm-el-package-reinstall-1] 8 (#$ . 16964)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@17
|
|
|
|
|
|
|
|
|
|
|
|
(fn PKG-DESC)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-el-package-reinstall-1 #[257 "\302!>\204 \303\304\305D\"\210\211\306H\307\310\311#\210\312 \236A@\313\"\207" [cl-struct-package-desc-tags package-archive-contents type-of signal wrong-type-argument package-desc 1 package-delete force nosave package-install t] 6 (#$ . 17217)])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(defalias 'helm-el-run-package-reinstall #[0 "\203 \301\302!\207\303\304!\207" [helm-alive-p helm-exit-and-execute-action helm-el-package-reinstall error "Running helm command outside of context"] 2 nil nil])
|
|
|
|
|
|
(put 'helm-el-run-package-reinstall 'helm-only t)
|
|
|
|
|
|
#@71 Preconfigured helm for listing and handling emacs packages.
|
|
|
|
|
|
|
|
|
|
|
|
(fn ARG)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-list-elisp-packages #[257 "\211\203 \303 \204 \304\305\306\"\307\310\301\311\n\312\313\314\315&\207" [helm-el-package--initialized-p helm-source-list-el-package helm-el-truncate-lines nil helm-make-source "list packages" helm-list-el-package-source helm :sources :truncate-lines :full-frame t :buffer "*helm list packages*"] 10 (#$ . 17799) "P"])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
#@180 Preconfigured helm for emacs packages.
|
|
|
|
|
|
|
|
|
|
|
|
Same as `helm-list-elisp-packages' but don't fetch packages on remote.
|
|
|
|
|
|
Called with a prefix ARG always fetch packages on remote.
|
|
|
|
|
|
|
|
|
|
|
|
(fn ARG)
|
2019-12-01 19:55:19 +01:00
|
|
|
|
(defalias 'helm-list-elisp-packages-no-fetch #[257 "\211?\301\302!)\207" [helm-el-package--initialized-p helm-list-elisp-packages nil] 3 (#$ . 18244) "P"])
|
2019-10-09 20:36:55 +02:00
|
|
|
|
(provide 'helm-elisp-package)
|
