diff options
| author | Franz Geffke <franz@pantherx.org> | 2024-03-30 12:11:27 +0000 |
|---|---|---|
| committer | Franz Geffke <franz@pantherx.org> | 2024-03-30 12:11:27 +0000 |
| commit | 77679b6d970f5c527c392315d19f8f4792a1db9c (patch) | |
| tree | 7b8bd38522bdb846f7c4e68541b46d46152c1a79 /px/services/device.scm | |
| parent | 0e3fdeb617c2578c060842dfbef114ba7723e4b9 (diff) | |
drop px-enterprise-channels-service
Diffstat (limited to 'px/services/device.scm')
| -rw-r--r-- | px/services/device.scm | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/px/services/device.scm b/px/services/device.scm index 64036fc..b9150fa 100644 --- a/px/services/device.scm +++ b/px/services/device.scm @@ -29,8 +29,6 @@ px-user-identity-configuration? px-user-identity-service-type - px-enterprise-channels-service - px-device-runner-configuration px-device-runner-service-type @@ -123,40 +121,6 @@ (default-value (px-user-identity-configuration)))) ;; -;; Pantherx Enterprise Channels Service -;; - -(define (px-enterprise-channels-service channels) - (let ((channel-conf (call-with-output-string (lambda (port) - (pretty-print channels port))))) - (simple-service 'enterprise-channels special-files-service-type - `(("/etc/guix/channels.scm" ,(computed-file "channels.scm" - (with-imported-modules '((guix - build - utils)) - #~(begin - (use-modules - (guix - build - utils)) - (let - ( - (base-dir - (dirname #$output))) - - - (mkdir-p - base-dir) - (call-with-output-file #$output - (lambda - (port) - - - (format - port - #$channel-conf)))))))))))) - -;; ;; Device Runner Service ;; |