diff --git a/example/edit.forth b/example/edit.forth
index 97cb24e..05c6c27 100755
--- a/example/edit.forth
+++ b/example/edit.forth
@@ -33,6 +33,9 @@ Get the name of the file to edit. If no file is provided, exit.
 ~~~
 sys:argc n:zero? [ #0 unix:exit ] if
 #0 sys:argv s:keep !SourceFile
+@SourceFile 'new s:eq?
+  [ #1 sys:argv s:keep !SourceFile
+    @SourceFile file:A file:open file:close ] if
 ~~~
 
 This is just a shortcut to make writing strings to the current file