From 82ab75b6a2d186afc2a4c98e7079a692076c138f Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Thu, 22 Dec 2022 23:21:49 +0100 Subject: gnu: emacs-dashboard: Improve package style. * gnu/packages/emacs-xyz.scm (emacs-dashboard)[arguments]: Use G-expressions. <#:include>: Use %default-include. <#:phases>: Remove trailing #T, and unnecessary call to CHMOD. [description]: Properly capitalize it. --- gnu/packages/emacs-xyz.scm | 25 ++++++++++++------------- 1 file changed, 12 insertions(+), 13 deletions(-) diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 55eb2793658..e87500a65f5 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -23192,24 +23192,23 @@ Emacs minor mode to escape sequences in code.") (sha256 (base32 "1c6snnpc9rp6zhhdz411wyh2wn56yq2cdmxxqsp1ibvac8cbb1pq")))) (build-system emacs-build-system) + (arguments + (list + #:include #~(cons* "\\.txt$" "\\.png$" %default-include) + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch-dashboard-widgets + ;; This phase fixes compilation error. + (lambda _ + (emacs-substitute-variables "dashboard-widgets.el" + ("dashboard-init-info" + '(format "Loaded in %s" (emacs-init-time))))))))) (propagated-inputs (list emacs-page-break-lines)) - (arguments - '(#:include '("\\.el$" "\\.txt$" "\\.png$") - #:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch-dashboard-widgets - ;; This phase fixes compilation error. - (lambda _ - (chmod "dashboard-widgets.el" #o666) - (emacs-substitute-variables "dashboard-widgets.el" - ("dashboard-init-info" - '(format "Loaded in %s" (emacs-init-time)))) - #t))))) (home-page "https://github.com/rakanalh/emacs-dashboard") (synopsis "Startup screen extracted from Spacemacs") (description "This package provides an extensible Emacs dashboard, with -sections for bookmarks, projectil projects, org-agenda and more.") +sections for bookmarks, Projectile projects, Org Agenda and more.") (license license:gpl3+)))) (define-public emacs-slime-company -- cgit v1.2.3