diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2021-01-03 22:32:46 +0100 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2021-01-03 22:32:46 +0100 |
| commit | 20fbca0bb5efeafc9d296125ef1ff3190a4efbae (patch) | |
| tree | 1144b0cd7a79b1f40fac22370d6028bf831cc03e /guile-studio-configure.scm | |
| parent | 01bd103694019ce4a00b6a3556f4e56cab6089b3 (diff) | |
Remove obsolete icons argument.
Diffstat (limited to 'guile-studio-configure.scm')
| -rw-r--r-- | guile-studio-configure.scm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/guile-studio-configure.scm b/guile-studio-configure.scm index e149488..f337283 100644 --- a/guile-studio-configure.scm +++ b/guile-studio-configure.scm @@ -4,7 +4,7 @@ (srfi srfi-1) (srfi srfi-26)) -(define (generate-configuration prefix emacsdir guiledir picture-language icons emacs-package-dirs) +(define (generate-configuration prefix emacsdir guiledir picture-language emacs-package-dirs) `(progn (let ((guix-emacs.el (expand-file-name @@ -568,7 +568,7 @@ exec ~a/bin/emacs -mm --no-site-file --no-site-lisp --no-x-resources --no-init-f (map (cut string-append infodir "/" <>) (or (scandir infodir info-file?) '())))) (match (command-line) - ((_ prefix emacsdir guiledir picture-language icons . emacs-package-dirs) + ((_ prefix emacsdir guiledir picture-language . emacs-package-dirs) (let* ((share (string-append prefix "/share")) (datadir (string-append share "/guile-studio")) (infodir (string-append datadir "/info"))) @@ -589,7 +589,6 @@ exec ~a/bin/emacs -mm --no-site-file --no-site-lisp --no-x-resources --no-init-f emacsdir guiledir picture-language - icons emacs-package-dirs) #:display? #f))) @@ -614,7 +613,7 @@ exec ~a/bin/emacs -mm --no-site-file --no-site-lisp --no-x-resources --no-init-f #t) ((script . _) (format (current-error-port) - "usage: ~a prefix emacsdir picture-language icons emacs-package-dirs ...\n" + "usage: ~a prefix emacsdir picture-language emacs-package-dirs ...\n" script)))) (main) |