瀏覽代碼

minor improvement in pulldown menu label

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7310 8c9fc860-2736-0410-a75d-ab315db34111
eth.hunzikerp 8 年之前
父節點
當前提交
c2cfecf0cb
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      source/WMNavigate.Mod

+ 1 - 1
source/WMNavigate.Mod

@@ -1153,7 +1153,7 @@ TYPE
 				END;
 				END;
 				IF (*(window IS WMComponents.FormWindow) &*)  (WMWindowManager.FlagStorable IN window.flags) & (NofSystemCommands > 6) THEN
 				IF (*(window IS WMComponents.FormWindow) &*)  (WMWindowManager.FlagStorable IN window.flags) & (NofSystemCommands > 6) THEN
 					DrawBg(y);
 					DrawBg(y);
-					canvas.DrawString(LeftBorder, y + 16, "StoreWindow"); INC(y, LineHeight);
+					canvas.DrawString(LeftBorder, y + 16, "StoreWindowData"); INC(y, LineHeight);
 				END;
 				END;
 			END DrawSystemCommands;
 			END DrawSystemCommands;