]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/calendar/model/model.factor
core, basis, extra: Remove DOS line endings from files.
[factor.git] / basis / calendar / model / model.factor
index 305c31c385e2d4f90db3ff47b13ebed027aece6e..4948c9458100c6765673e62bb87fad86d47fd987 100644 (file)
@@ -1,21 +1,21 @@
-! Copyright (C) 2008, 2010 Slava Pestov\r
-! See http://factorcode.org/license.txt for BSD license.\r
-USING: calendar namespaces models threads kernel init ;\r
-IN: calendar.model\r
-\r
-SYMBOL: time\r
-\r
-: (time-thread) ( -- )\r
-    now time get set-model\r
-    1 seconds sleep (time-thread) ;\r
-\r
-: time-thread ( -- )\r
-    [\r
-        init-namespaces\r
-        (time-thread)\r
-    ] "Time model update" spawn drop ;\r
-\r
-[\r
-    f <model> time set-global\r
-    time-thread\r
-] "calendar.model" add-startup-hook\r
+! Copyright (C) 2008, 2010 Slava Pestov
+! See http://factorcode.org/license.txt for BSD license.
+USING: calendar namespaces models threads kernel init ;
+IN: calendar.model
+
+SYMBOL: time
+
+: (time-thread) ( -- )
+    now time get set-model
+    1 seconds sleep (time-thread) ;
+
+: time-thread ( -- )
+    [
+        init-namespaces
+        (time-thread)
+    ] "Time model update" spawn drop ;
+
+[
+    f <model> time set-global
+    time-thread
+] "calendar.model" add-startup-hook