Re: Package variation

[Brett Gilio]

Efraim Flashner writes:

> On Tue, Oct 23, 2018 at 01:04:05PM -0500, Brett Gilio wrote:
>> 
>> Efraim Flashner writes:
>> 
>> > On Tue, Oct 23, 2018 at 01:51:21AM -0500, Brett Gilio wrote:
>> >> Hi all,
>> >> 
>> >> I am trying to customize my the default gnome-package which gets
>> >> installed with the gnome-desktop-service.
>> >> 
>> >> My strategy here has been to define a gnome-custom package in my
>> >> config.scm which inherits the gnome package, and remove the dependencies
>> >> that I do not use (such as gedit or nautilus).
>> >> 
>> >> However, I am not successful. Below is my config.scm, does anybody have
>> >> any ideas?
>> >> 
>> >> --
>> >> 
>> >> ;; This is an operating system configuration template
>> >> ;; for a "desktop" setup with GNOME and Xfce where the
>> >> ;; root partition is encrypted with LUKS.
>> >> 
>> >> (use-modules (gnu) (gnu system nss) (guix packages))
>> >> (use-service-modules desktop)
>> >> (use-package-modules certs gnome)
>> >> 
>> >> (define-public gnome-custom
>> >>   (package (inherit gnome)
>> >>     (name "gnome-custom")
>> >>     (inputs (alist-delete "nautilus" (package-inputs gnome)))))
>> >> 
>> >> (define %my-gnome
>> >>   (modify-services %desktop-services
>> >>              (gnome-desktop-service-type config =>
>> >>                                          (gnome-desktop-configuration
>> >>                                                         (gnome-package 
>> >> gnome-custom)))))
>> >> 
>> > <snip>
>> >> 
>> >>   ;; Add GNOME and/or Xfce---we can choose at the log-in
>> >>   ;; screen with F1.  Use the "desktop" services, which
>> >>   ;; include the X11 log-in service, networking with
>> >>   ;; NetworkManager, and more.
>> >>   (services (cons* (gnome-desktop-service)
>> >>                    %my-gnome))
>> >
>> > Here you still have the default gnome-desktop-service in the list, and
>> > I'd assume you'd have a 50-50 chance of getting the right one when
>> > logging in. I would change it to (untested!):
>> >
>> >     (services (cons* (service gnome-desktop-service-type
>> >                               config =>
>> >                               (gnome-desktop-configuration
>> >                                 (inherit config)
>> >                                 (gnome-package gnome-custom)))
>> >                      %desktop-services))
>> >
>> > and just remove %my-gnome from above.
>> 
>> Hi Efraim,
>> 
>> What you said makes sense, and I think we are on the right track
>> here. This is what I have now.
>> 
>> (define-public gnome-custom
>>   (package (inherit gnome)
>>     (name "gnome-custom")
>>     (inputs (alist-delete "nautilus" (package-inputs gnome)))))
>> 
>> ;; .......
>> 
>> (services (cons* (service gnome-desktop-service-type
>>                          config =>
>>                          (gnome-desktop-configuration
>>                           (inherit config)
>>                           (gnome-package gnome-custom)))
>>                 %desktop-services))
>> 
>> 
>> However, it doesn't seem to recognize the gnome-desktop-service-type,
>> which I know is coming from the desktop service. Perhaps we are defining
>> it incorrectly? The documentation on the configuration system seems to
>> suggest we use the gnome-desktop-service and then place the
>> gnome-desktop-service, and then inherit and set the gnome-custom
>> package. But I could be misreading it. Regardless, I am still
>> unsuccessful here.
>> 
>> Thank you for your time.
>
> according to gnu/services/desktop.scm gnome-desktop-service-type should
> work, but since it doesn't seem to like it then go ahead and try
>
> (service gnome-desktop-service
>     config => ...

I tried that and also simply removing the service definition, but it
still doesn't seem to recognize it. I wonder if it is something to do
with the service-modules being incorrect in the header.