Re: Removing prop-inputs
"bre...@posteo.net" skrev: (12 januari 2019 04:08:13 CET) >Perfect! My appreciation! >Sent from my Sprint Phone. >-- Original message--From: Timothy SampleDate: Fri, Jan 11, >2019 8:50 PMTo: bre...@posteo.net;Cc: help-guix;Help-Guix;Subject:Re: >Removing prop-inputs >Hi brettg, > >bre...@posteo.net writes: > >> On 12.01.2019 02:25, bre...@posteo.net wrote: >>> Hi all, this is my system configuration file. I am trying to remove >>> nautilus and epiphany from the gnome-desktop-service that gets >loaded. >>> So far I am not having any luck. Any ideas? >>> >>> [...] >> >> Update, I got it to work, but with some very hackish code. Any >> suggestions would still be appreciated. >> >> (define-public gnome-custom >> (package (inherit gnome) >> (name "gnome-custom") >> (propagated-inputs (remove >> (match-lambda >>((name _) >> (string=? name "epiphany"))) >> (remove >> (match-lambda >> ((name _) >> (string=? name "eog"))) >> (remove >>(match-lambda >> ((name _) >> (string=? name "totem"))) >>(remove >> (match-lambda >> ((name _) >>(string=? name "gedit"))) >> (remove >> (match-lambda >>((name _) >> (string=? name "yelp"))) >> (remove >> (match-lambda >> ((name _) >> (string=? name "gnome-calculator"))) >> (package-propagated-inputs gnome)) > >You could try > >(remove (match-lambda > ((name _) > (member name '("epiphany" "eog" ... >(package-propagated-inputs gnome)) > >Hope that helps! > > >-- Tim Hi Tim and Brett I think this snippet would enrich the manual. Could one of you send a patch? -- Sent from my p≡p for Android. pEpkey.asc Description: application/pgp-keys
Re: Removing prop-inputs
Perfect! My appreciation! Sent from my Sprint Phone. -- Original message--From: Timothy SampleDate: Fri, Jan 11, 2019 8:50 PMTo: bre...@posteo.net;Cc: help-guix;Help-Guix;Subject:Re: Removing prop-inputs Hi brettg, bre...@posteo.net writes: > On 12.01.2019 02:25, bre...@posteo.net wrote: >> Hi all, this is my system configuration file. I am trying to remove >> nautilus and epiphany from the gnome-desktop-service that gets loaded. >> So far I am not having any luck. Any ideas? >> >> [...] > > Update, I got it to work, but with some very hackish code. Any > suggestions would still be appreciated. > > (define-public gnome-custom > (package (inherit gnome) > (name "gnome-custom") > (propagated-inputs (remove > (match-lambda > ((name _) > (string=? name "epiphany"))) > (remove >(match-lambda > ((name _) > (string=? name "eog"))) >(remove > (match-lambda > ((name _) >(string=? name "totem"))) > (remove > (match-lambda >((name _) > (string=? name "gedit"))) > (remove > (match-lambda > ((name _) > (string=? name "yelp"))) > (remove >(match-lambda > ((name _) > (string=? name "gnome-calculator"))) >(package-propagated-inputs gnome)) You could try (remove (match-lambda ((name _) (member name '("epiphany" "eog" ... (package-propagated-inputs gnome)) Hope that helps! -- Tim
Re: Removing prop-inputs
Hi brettg, bre...@posteo.net writes: > On 12.01.2019 02:25, bre...@posteo.net wrote: >> Hi all, this is my system configuration file. I am trying to remove >> nautilus and epiphany from the gnome-desktop-service that gets loaded. >> So far I am not having any luck. Any ideas? >> >> [...] > > Update, I got it to work, but with some very hackish code. Any > suggestions would still be appreciated. > > (define-public gnome-custom > (package (inherit gnome) > (name "gnome-custom") > (propagated-inputs (remove > (match-lambda > ((name _) > (string=? name "epiphany"))) > (remove >(match-lambda > ((name _) > (string=? name "eog"))) >(remove > (match-lambda > ((name _) >(string=? name "totem"))) > (remove > (match-lambda >((name _) > (string=? name "gedit"))) > (remove > (match-lambda > ((name _) > (string=? name "yelp"))) > (remove >(match-lambda > ((name _) > (string=? name "gnome-calculator"))) >(package-propagated-inputs gnome)) You could try (remove (match-lambda ((name _) (member name '("epiphany" "eog" ... (package-propagated-inputs gnome)) Hope that helps! -- Tim
Re: Removing prop-inputs
On 12.01.2019 02:25, bre...@posteo.net wrote: Hi all, this is my system configuration file. I am trying to remove nautilus and epiphany from the gnome-desktop-service that gets loaded. So far I am not having any luck. Any ideas? (use-modules (gnu) (gnu system nss) (srfi srfi-1) (guix packages) (ice-9 match)) (use-service-modules desktop xorg) (use-package-modules certs gnome) (define-public gnome-custom (package (inherit gnome) (name "gnome-custom") (propagated-inputs (remove (match-lambda ;; Ignore the second value. ((name _) (string=? name "nautilus") (string=? name "epiphany"))) (package-propagated-inputs gnome) (operating-system (host-name "guixsd") (timezone "America/Chicago") (locale "en_US.utf8") ;; Use the UEFI variant of GRUB with the EFI System ;; Partition mounted on /boot/efi. (bootloader (bootloader-configuration (bootloader grub-efi-bootloader) (target "/boot/efi"))) (file-systems (cons (file-system (device (file-system-label "my-root")) (mount-point "/") (type "ext4")) %base-file-systems)) (users (cons (user-account (name "brettg") (comment "Brett Gilio") (group "users") (supplementary-groups '("wheel" "netdev" "audio" "video")) (home-directory "/home/brettg")) %base-user-accounts)) ;; This is where we specify system-wide packages. (packages (cons* nss-certs ;for HTTPS access gvfs ;for user mounts %base-packages)) ;; 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* (service gnome-desktop-service-type (gnome-desktop-configuration (inherit config) (gnome-package gnome-custom))) %desktop-services)) ;; Allow resolution of '.local' host names with mDNS. (name-service-switch %mdns-host-lookup-nss)) Update, I got it to work, but with some very hackish code. Any suggestions would still be appreciated. (define-public gnome-custom (package (inherit gnome) (name "gnome-custom") (propagated-inputs (remove (match-lambda ((name _) (string=? name "epiphany"))) (remove (match-lambda ((name _) (string=? name "eog"))) (remove (match-lambda ((name _) (string=? name "totem"))) (remove (match-lambda ((name _) (string=? name "gedit"))) (remove (match-lambda ((name _) (string=? name "yelp"))) (remove (match-lambda ((name _) (string=? name "gnome-calculator"))) (package-propagated-inputs gnome))
Removing prop-inputs
Hi all, this is my system configuration file. I am trying to remove nautilus and epiphany from the gnome-desktop-service that gets loaded. So far I am not having any luck. Any ideas? (use-modules (gnu) (gnu system nss) (srfi srfi-1) (guix packages) (ice-9 match)) (use-service-modules desktop xorg) (use-package-modules certs gnome) (define-public gnome-custom (package (inherit gnome) (name "gnome-custom") (propagated-inputs (remove (match-lambda ;; Ignore the second value. ((name _) (string=? name "nautilus") (string=? name "epiphany"))) (package-propagated-inputs gnome) (operating-system (host-name "guixsd") (timezone "America/Chicago") (locale "en_US.utf8") ;; Use the UEFI variant of GRUB with the EFI System ;; Partition mounted on /boot/efi. (bootloader (bootloader-configuration (bootloader grub-efi-bootloader) (target "/boot/efi"))) (file-systems (cons (file-system (device (file-system-label "my-root")) (mount-point "/") (type "ext4")) %base-file-systems)) (users (cons (user-account (name "brettg") (comment "Brett Gilio") (group "users") (supplementary-groups '("wheel" "netdev" "audio" "video")) (home-directory "/home/brettg")) %base-user-accounts)) ;; This is where we specify system-wide packages. (packages (cons* nss-certs ;for HTTPS access gvfs ;for user mounts %base-packages)) ;; 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* (service gnome-desktop-service-type (gnome-desktop-configuration (inherit config) (gnome-package gnome-custom))) %desktop-services)) ;; Allow resolution of '.local' host names with mDNS. (name-service-switch %mdns-host-lookup-nss))