use #:keywords in module/*.scm, not :keywords

[bpt/guile.git] / module / system / base / language.scm

diff --git a/module/system/base/language.scm b/module/system/base/language.scm
index 47c408f..609db7d 100644 (file)
--- a/module/system/base/language.scm
+++ b/module/system/base/language.scm
@@ -20,8 +20,8 @@
 ;;; Code:
 
 (define-module (system base language)
-  :use-syntax (system base syntax)
-  :export (define-language lookup-language make-language
+  #:use-syntax (system base syntax)
+  #:export (define-language lookup-language make-language
            language-name language-title language-version language-reader
            language-printer language-read-file language-expander
            language-translator language-evaluator language-environment))
@@ -39,7 +39,7 @@
                           ))
 
 (define-macro (define-language name . spec)
-  `(define ,name (make-language :name ',name ,@spec)))
+  `(define ,name (make-language #:name ',name ,@spec)))
 
 (define (lookup-language name)
   (let ((m (resolve-module `(language ,name spec))))