diff options
| -rw-r--r-- | oni/home/config/pop-os.scm | 3 | ||||
| -rw-r--r-- | oni/home/services/zsh.scm | 8 |
2 files changed, 9 insertions, 2 deletions
diff --git a/oni/home/config/pop-os.scm b/oni/home/config/pop-os.scm index 9fc0c0c..174dfd5 100644 --- a/oni/home/config/pop-os.scm +++ b/oni/home/config/pop-os.scm @@ -128,7 +128,8 @@ '("^ +")) (enter-accept #t) (common-subcommands - '("guix")))))))) + '("guix")) + (sync-address "http://phoenix.fold-kanyu.ts.net:8888"))))))) (define oni-home-herbstluftwm-configuration (home-module diff --git a/oni/home/services/zsh.scm b/oni/home/services/zsh.scm index 2d714d1..09d248f 100644 --- a/oni/home/services/zsh.scm +++ b/oni/home/services/zsh.scm @@ -159,6 +159,9 @@ (define (serialize-boolean field value) (format #f "~a = ~a~%" (serialize-field-name field) (if value "true" "false"))) +(define (serialize-string field value) + (format #f "~a = ~s~%" (serialize-field-name field) value)) + (define (filter-mode? value) (memq value '(global host session directory workspace))) @@ -185,7 +188,10 @@ and give the user a chance to edit.") (common-subcommands (list-of-strings '()) "Configures commands where we should consider the subcommand as part of the -statistics. For example, consider kubectl get rather than just kubectl.")) +statistics. For example, consider kubectl get rather than just kubectl.") + (sync-address + (string "") + "The address of the server to sync with!")) (define (add-zsh-atuin config) (home-zsh-extension |