diff options
| -rw-r--r-- | oni/home/services/xdisorg.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/oni/home/services/xdisorg.scm b/oni/home/services/xdisorg.scm index d684bfd..26ed246 100644 --- a/oni/home/services/xdisorg.scm +++ b/oni/home/services/xdisorg.scm @@ -90,7 +90,11 @@ "\n}\n"))) (define (format-rofi-theme theme) - (let ((keys (map object->string (butlast theme 1))) + (let ((keys (map (lambda (s) + (if (symbol? s) + (symbol->string s) + (object->string s))) + (butlast theme 1))) (values (car (list-tail theme (- (length theme) 1))))) (string-append (string-join keys ", ") " {\n " |