diff --git a/ed.c b/ed.c
index 3f878eb..032bc78 100644
--- a/ed.c
+++ b/ed.c
@@ -1191,8 +1191,8 @@ repeat:
 			goto unexpected;
 		if (modflag)
 			goto modified;
-		setscratch();
 		strcpy(savfname, getfname());
+		setscratch();
 		deflines(curln, curln);
 		doread(savfname);
 		clearundo();