diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2019-09-24 09:17:31 +0200 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2019-09-24 09:17:31 +0200 |
commit | 3f5f338e560a3e450cef4e95497a6bda8afae951 (patch) | |
tree | 222257c4ab0c6a1dc003b2a7bd98c1a2857e8005 /helm-elisp-package.el | |
parent | 0d7ced18be1e6a94828e065655335b12c8ce5583 (diff) |
Improve transformer for elisp packages
* helm-elisp-package.el (helm-el-package--transformer): Do it.
Diffstat (limited to 'helm-elisp-package.el')
-rw-r--r-- | helm-elisp-package.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/helm-elisp-package.el b/helm-elisp-package.el index ae0b6c93..a7e4159e 100644 --- a/helm-elisp-package.el +++ b/helm-elisp-package.el @@ -315,13 +315,16 @@ for upgrade-p = (assq name helm-el-package--upgrades) for user-installed-p = (memq name package-selected-packages) do (when user-installed-p (put-text-property 0 2 'display "S " disp)) - do (when (memq name helm-el-package--removable-packages) + do (when (or (memq name helm-el-package--removable-packages) + (and upgrade-p installed-p)) (put-text-property 0 2 'display "U " disp) (put-text-property 2 (+ (length (symbol-name name)) 2) 'face 'font-lock-variable-name-face disp)) do (when (and upgrade-p (assq name helm-el-package--to-recompile)) (put-text-property 0 2 'display "R " disp)) + do (when (and upgrade-p (not installed-p)) + (put-text-property 0 2 'display "I " disp)) for cand = (cons disp (car (split-string disp))) when (or (and built-in-p (eq helm-el-package--show-only 'built-in)) |