1 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
index 1fed07990..70f595ff4 100644
--- a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
+++ b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux
@@ -48,13 +48,13 @@
 (type: (Action ! a)
   (! (Try a)))
 
-(def: (then pre post)
+(def (then pre post)
   (-> _.Expression _.Expression _.Expression)
   (_.manual (format (_.code pre)
                     text.new_line
                     (_.code post))))
 
-(def: bundle_module
+(def bundle_module
   (-> Output (Try _.Expression))
   (|>> sequence.list
        (list#each product.right)
@@ -71,11 +71,11 @@
                                  (..then so_far)))))
                   (is _.Expression (_.manual "")))))
 
-(def: module_file
+(def module_file
   (-> archive.ID file.Path)
   (|>> %.nat (text.suffix ".scm")))
 
-(def: mode
+(def mode
   tar.Mode
   (all tar.and
        tar.read_by_group
@@ -85,16 +85,16 @@
        tar.write_by_group
        tar.write_by_owner))
 
-(def: owner
+(def owner
   tar.Owner
   [tar.#name tar.anonymous
    tar.#id tar.no_id])
 
-(def: ownership
+(def ownership
   [tar.#user ..owner
    tar.#group ..owner])
 
-(def: (write_module now mapping [module [module_id [descriptor document output]]])
+(def (write_module now mapping [module [module_id [descriptor document output]]])
   (-> Instant (Dictionary Module archive.ID)
       [Module [archive.ID [Descriptor (Document .Module) Output]]]
       (Try tar.Entry))
@@ -115,7 +115,7 @@
      module_file (tar.path (..module_file module_id))]
     (in {tar.#Normal [module_file now ..mode ..ownership entry_content]})))
 
-(def: .public (package now)
+(def .public (package now)
   (-> Instant Packager)
   (function (package host_dependencies archive program)
     (do [! try.monad]