]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/mongodb/cmd/cmd.factor
core, basis, extra: Remove DOS line endings from files.
[factor.git] / extra / mongodb / cmd / cmd.factor
index 49959d690cec64ad5a0cf6ffb92a6f17986de42a..89ceb86df944766990480b8d66f4ca00fe180805 100644 (file)
@@ -3,7 +3,7 @@ IN: mongodb.cmd
 
 <PRIVATE
 
-TUPLE: mongodb-cmd 
+TUPLE: mongodb-cmd
     { name string }
     { const? boolean }
     { admin? boolean }
@@ -13,7 +13,7 @@ TUPLE: mongodb-cmd
 
 PRIVATE>
 
-CONSTANT: buildinfo-cmd 
+CONSTANT: buildinfo-cmd
     T{ mongodb-cmd f "buildinfo" t t f H{ { "buildinfo" 1 } } }
 
 CONSTANT: list-databases-cmd
@@ -54,7 +54,7 @@ CONSTANT: repair-db-cmd
     T{ mongodb-cmd f "repairDatabase" f f f H{ { "repairDatabase" 1 } } }
 
 ! Options: -1 gets the current profile level; 0-2 set the profile level
-CONSTANT: profile-cmd 
+CONSTANT: profile-cmd
     T{ mongodb-cmd f "profile" f f f H{ { "profile" 0 } } }
 
 CONSTANT: server-status-cmd
@@ -124,7 +124,7 @@ CONSTANT: findandmodify-cmd
     T{ mongodb-cmd f "findandmodify" f f f H{ { "findandmodify" f } } }
 
 : make-cmd ( cmd-stub -- cmd-assoc )
-    dup const?>> [  ] [  
+    dup const?>> [  ] [
         clone [ clone <linked-assoc> ] change-assoc
     ] if ; inline