Chris Marusich writes:
> Hi Brett, > > Brett Gilio <bre...@posteo.net> writes: > >> (define-public gnome-custom >> (package (inherit gnome) >> (name "gnome-custom") >> (inputs (alist-delete "nautilus" (package-inputs gnome))))) > > The spirit of this is correct, but the implementation isn't quite > right. The gnome package has no inputs: > > scheme@(guile-user)> ,use (gnu packages gnome) > scheme@(guile-user)> ,use (guix packages) > scheme@(guile-user)> (package-inputs gnome) > $1 = () > > Instead, it has many propagated inputs. So, you should probably write: > > (define-public gnome-custom > (package (inherit gnome) > (name "gnome-custom") > (propagated-inputs (alist-delete > "nautilus" > (package-propagated-inputs gnome))))) > > This will work as you expect. It's not incorrect to use alist-delete > here, but FYI you can also use matching to do this as follows: > > (define-public gnome-custom > (package (inherit gnome) > (name "gnome-custom") > (propagated-inputs (remove > (match-lambda > ;; Ignore the second value. > ((name _) > (string=? name "nautilus"))) > (package-propagated-inputs gnome))))) > > Whether or not you like that better probably depends on whether or not > you view the value returned by (package-propagated-inputs gnome) as an > alist or a list of 2-element lists. > >> (services (cons* (service gnome-desktop-service-type >> config => >> (gnome-desktop-configuration >> (inherit config) >> (gnome-package gnome-custom))) >> %desktop-services)) > > It looks like you're using "config =>" from the modify-services syntax > without actually using modify-services. Try this instead: > > (services (cons* (service gnome-desktop-service-type > (gnome-desktop-configuration > (inherit config) > (gnome-package gnome-custom))) > %desktop-services)) > > This should create and add a gnome-desktop-service-type service instance > with the configuration you've specified. > > Hope that helps! Hi chris! Thank you for your feedback, and your insight. I appreciate it greatly. I have applied your changes (Both variations) and neither one seems to be working and nautilus remains on the system. I am honestly at a loss of what is wrong with the approach.
