Re: [V] Re: patch for adding 'pui-uninteresting-package-face'
|--==> "JM" == Jeff Mincy <jeff(a)delphioutpost.com> writes:
JM> OK, Please try the following patch (off of 21.4.6 package-ui.el)
Wonderful. Except it doesn't work. :-(
JM> This version adds the following customizations:
JM> pui-boring-package-face
JM> pui-up-to-date-package-invisible
JM> pui-uninstalled-package-invisible
JM> pui-boring-package-invisible
JM> pui-boring-packages
These all sound fine to me.
JM> Any package listed in pui-boring-packages is boring
JM> I made mule packages boring for non mule emacs. Feel free to change
JM> the defaults.
I'd just change it to a negative test (if (not (featurep 'mule))...).
That way, you don't need a "do nothing" form in the test.
JM> You can make invisible lines visible and vice-verse by using the
JM> new 'b' command. Feel free to change the key binding.
I have no strong feelings of this, 'b' is fine. If I was going to
change it, I'd use 'I'.
JM> A further idea - Package 'views' could be built on top of this.
JM> Example views:
JM> 'installed package view' - show installed packages
JM> 'all packages view' - show every package
JM> 'update package view' - show outdated and uninstalled (but not
JM> boring) packages.
Sounds nifty.
JM> + (if (memq pkg-sym pui-boring-packages)
JM> + (list "-" pui-boring-package-face
pui-boring-package-invisible)
JM> + (list "-" pui-uninstalled-package-face
pui-uninstalled-package-invisible)))))
This is where it's failing for me. The
'(if (memq pkg-sym pui-boring-packages)' is always returning nil.
Setting 'pui-up-to-date-package-invisible' works as expected.
Oh and I just thought of a possible annoyance. When a new Mule
package is added to the packages, the default value of
'pui-boring-packages' for non-Mule XEmacsen would no longer hide all
the Mule packages.
Maybe for hiding all the Mule packages, instead of listing them, we
should parse the package-index file and hide anything that has
'category "mule"'. What do you think, Jeff?
--
|---<Steve Youngs>---------------<GnuPG KeyID: 10D5C9C5>---|
| XEmacs - It's not just an editor. |
| It's a way of life. |
|------------------------------------<youngs(a)xemacs.org>---|