diff --git a/collects/drscheme/private/unit.ss b/collects/drscheme/private/unit.ss
index 120090b690..34d48d0645 100644
--- a/collects/drscheme/private/unit.ss
+++ b/collects/drscheme/private/unit.ss
@@ -729,7 +729,7 @@ module browser threading seems wrong.
                         (/ (+ yl yr) 2)))))
 
           (define/public (still-untouched?)
-            (and (= (last-position) 0)
+            (and (or (= (last-position) 0) (not really-modified?))
                  (not (is-modified?))
                  (not (get-filename))))
           ;; inserts the auto-text if any, and executes the text if so