Smart quotes

diff --git a/basis/unix/debugger/debugger.factor b/basis/unix/debugger/debugger.factor
index ea3265705796daa9aed0052c9d36fab5a3f148a9..e059e1a1844171d3659ab9a87695f07698bd2e05 100644 (file)
--- a/basis/unix/debugger/debugger.factor
+++ b/basis/unix/debugger/debugger.factor
@@ -9,7 +9,7 @@ M: unix-error error.
     dup message>> write " (" write errno>> pprint ")" print ;
 
 M: unix-system-call-error error.
-    "Unix system call ``" write dup word>> pprint "'' failed:" print
+    "Unix system call “" write dup word>> pprint "” failed:" print
     nl
     dup message>> write " (" write dup errno>> pprint ")" print
     nl

diff --git a/core/parser/parser.factor b/core/parser/parser.factor
index 3c915cb07de56f62a6883449316f6b424989f05e..5c93ed86dbd5ef1fc04094817056ad2116bd9794 100644 (file)
--- a/core/parser/parser.factor
+++ b/core/parser/parser.factor
@@ -57,7 +57,7 @@ SYMBOL: auto-use?
         dup vocabulary>>
         [ (use+) ]
         [ amended-use get dup [ push ] [ 2drop ] if ]
-        [ "Added ``" "'' vocabulary to search path" surround note. ]
+        [ "Added “" "” vocabulary to search path" surround note. ]
         tri
     ] [ create-in ] if ;