add missing inner call

2013-01-05 17:30:46 -06:00 · 2013-01-05 17:30:46 -06:00 · 12d670b5a3
commit 12d670b5a3
parent c907368e0f
1 changed files with 2 additions and 1 deletions
--- a/collects/framework/private/editor.rkt
+++ b/collects/framework/private/editor.rkt
@ -555,7 +555,8 @@
        (inner (void) on-save-file name format))
      (define/augment (after-save-file success?)
        (when success?
-          (set! auto-save-error? #f)))
+          (set! auto-save-error? #f))
+        (inner (void) after-save-file success?))

      (define/augment (on-close)
        (remove-autosave)