summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--dotfiles/.guile27
1 files changed, 17 insertions, 10 deletions
diff --git a/dotfiles/.guile b/dotfiles/.guile
index b29597b..82ba85b 100644
--- a/dotfiles/.guile
+++ b/dotfiles/.guile
@@ -1,13 +1,20 @@
;; -*- scheme -*-
-(false-if-exception
- (begin
- (use-modules (ice-9 readline))
- (activate-readline)))
+(cond ((false-if-exception (resolve-interface '(ice-9 readline)))
+ =>
+ (lambda (module)
+ ;; Enable completion and input history at the REPL.
+ ((module-ref module 'activate-readline))))
+ (else
+ (display "Consider installing the 'guile-readline' package for
+convenient interactive line editing and input history.\n\n")))
-(define-syntax-rule (push! var x)
- (set! var (cons x var)))
-
-(define (add-to-load-path* dir)
- (push! %load-path dir)
- (push! %load-compiled-path dir))
+(unless (getenv "INSIDE_EMACS")
+ (cond ((false-if-exception (resolve-interface '(ice-9 colorized)))
+ =>
+ (lambda (module)
+ ;; Enable completion and input history at the REPL.
+ ((module-ref module 'activate-colorized))))
+ (else
+ (display "Consider installing the 'guile-colorized' package
+for a colorful Guile experience.\n\n"))))