From mboxrd@z Thu Jan 1 00:00:00 1970 From: Brett Gilio Subject: Re: Package variation Date: Wed, 24 Oct 2018 01:01:22 -0500 Message-ID: <87ftwvj32l.fsf@posteo.net> References: <87pnw1p34m.fsf@posteo.net> <20181023073302.GG1102@macbook41> <87r2ggwne2.fsf@posteo.net> <878t2oul96.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:41174) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gFCEo-0002Eu-Ax for guix-devel@gnu.org; Wed, 24 Oct 2018 02:01:51 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gFCEh-0005PJ-I3 for guix-devel@gnu.org; Wed, 24 Oct 2018 02:01:46 -0400 Received: from mout01.posteo.de ([185.67.36.65]:50200) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1gFCEb-0005FE-7G for guix-devel@gnu.org; Wed, 24 Oct 2018 02:01:39 -0400 Received: from submission (posteo.de [89.146.220.130]) by mout01.posteo.de (Postfix) with ESMTPS id C24D42132E for ; Wed, 24 Oct 2018 08:01:27 +0200 (CEST) In-reply-to: <878t2oul96.fsf@gmail.com> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: Chris Marusich Cc: Guix-devel Chris Marusich writes: > Hi Brett, > > Brett Gilio 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.