core, basis, extra: Remove DOS line endings from files.

[factor.git] / basis / ui / debugger / debugger.factor

diff --git a/basis/ui/debugger/debugger.factor b/basis/ui/debugger/debugger.factor
index e0abfe05be5b269844892cb4d378fccfefdc74de..ec4534a3dc3bafe7f91a3c1784888adbecfbf0eb 100644 (file)
--- a/basis/ui/debugger/debugger.factor
+++ b/basis/ui/debugger/debugger.factor
@@ -1,23 +1,23 @@
-! Copyright (C) 2006, 2011 Slava Pestov.\r
-! See http://factorcode.org/license.txt for BSD license.\r
-USING: accessors continuations debugger io io.streams.string\r
-kernel namespaces prettyprint ui ui.gadgets.worlds ;\r
-IN: ui.debugger\r
-\r
-: error-alert ( error -- )\r
-    [ "Error" ] dip [ print-error ] with-string-writer\r
-    system-alert ;\r
-\r
-! ( error -- )\r
-[ error-alert ] ui-error-hook set-global\r
-\r
-! ( error -- )\r
-[\r
-    ui-running? [ dup error-alert ] [ dup print-error ] if die\r
-] callback-error-hook set-global\r
-\r
-M: world-error error.\r
-    "An error occurred while drawing the world " write\r
-    dup world>> pprint-short "." print\r
-    "This world has been deactivated to prevent cascading errors." print\r
-    error>> error. ;\r
+! Copyright (C) 2006, 2011 Slava Pestov.
+! See http://factorcode.org/license.txt for BSD license.
+USING: accessors continuations debugger io io.streams.string
+kernel namespaces prettyprint ui ui.gadgets.worlds ;
+IN: ui.debugger
+
+: error-alert ( error -- )
+    [ "Error" ] dip [ print-error ] with-string-writer
+    system-alert ;
+
+! ( error -- )
+[ error-alert ] ui-error-hook set-global
+
+! ( error -- )
+[
+    ui-running? [ dup error-alert ] [ dup print-error ] if die
+] callback-error-hook set-global
+
+M: world-error error.
+    "An error occurred while drawing the world " write
+    dup world>> pprint-short "." print
+    "This world has been deactivated to prevent cascading errors." print
+    error>> error. ;