Преглед на файлове

tosunits: fix a bug in menu_tnormal

Thorsten Otto преди 3 години
родител
ревизия
a57a2b6cbe
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/tosunits/src/gem.pas

+ 1 - 1
packages/tosunits/src/gem.pas

@@ -426,7 +426,7 @@ end;
 
 function menu_tnormal(me_ntree: AESTreePtr; me_ntitle, me_nnormal: smallint): smallint;
 begin
-	menu_tnormal := aes.menu_ienable(@me_ntree[0], me_ntitle, me_nnormal);
+	menu_tnormal := aes.menu_tnormal(@me_ntree[0], me_ntitle, me_nnormal);
 end;
 
 function menu_text(me_ttree: AESTreePtr; me_titem: smallint; me_ttext: String): smallint;