diff options
author | Alex Kost <alezost@gmail.com> | 2016-05-07 21:23:42 +0300 |
---|---|---|
committer | Alex Kost <alezost@gmail.com> | 2016-05-10 12:05:53 +0300 |
commit | 10b0c31d6b14e01f6fd5e9c5ba90efab6d5641d0 (patch) | |
tree | 5a6e3658ceaf862cb1f7a0382353f1fab866be5d /emacs | |
parent | 26fceae21a26b3bc1e0ccfceb65b9c4be15733b1 (diff) | |
download | guix-10b0c31d6b14e01f6fd5e9c5ba90efab6d5641d0.tar guix-10b0c31d6b14e01f6fd5e9c5ba90efab6d5641d0.tar.gz |
emacs: Simplify 'guix-guile-boolean'.
* emacs/guix-guile.el (guix-guile-boolean): Use straightforward way to
define true/false value.
Diffstat (limited to 'emacs')
-rw-r--r-- | emacs/guix-guile.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/emacs/guix-guile.el b/emacs/guix-guile.el index cd6c54d87e..792f825ca5 100644 --- a/emacs/guix-guile.el +++ b/emacs/guix-guile.el @@ -57,7 +57,7 @@ Return nil, if current buffer does not define a module." (defun guix-guile-boolean (arg) "Return a string with guile boolean value. Transform elisp ARG (nil or non-nil) to the guile boolean (#f or #t)." - (concat "#" (prin1-to-string (if arg 't 'f)))) + (if arg "#t" "#f")) (defun guix-guile-keyword-regexp (keyword) "Return regexp to find guile KEYWORD." |