Browse Source

* adapted to a small weditor change

pierre 26 years ago
parent
commit
1e63c9750e
1 changed files with 5 additions and 2 deletions
  1. 5 2
      ide/text/fpviews.pas

+ 5 - 2
ide/text/fpviews.pas

@@ -1114,7 +1114,7 @@ begin
     SetCmdState(EditorCmds,Active);
     SetCmdState(EditorCmds,Active);
   end;
   end;
   if Active=false then
   if Active=false then
-     SetCmdState(ToClipCmds+FromClipCmds+NulClipCmds+UndoCmds,false);
+     SetCmdState(ToClipCmds+FromClipCmds+NulClipCmds+UndoCmd+RedoCmd,false);
   Message(Application,evBroadcast,cmCommandSetChanged,nil);
   Message(Application,evBroadcast,cmCommandSetChanged,nil);
 end;
 end;
 
 
@@ -2779,7 +2779,10 @@ end;
 END.
 END.
 {
 {
   $Log$
   $Log$
-  Revision 1.42  1999-09-16 14:34:59  pierre
+  Revision 1.43  1999-10-25 16:55:13  pierre
+   * adapted to a small weditor change
+
+  Revision 1.42  1999/09/16 14:34:59  pierre
     + TBreakpoint and TWatch registering
     + TBreakpoint and TWatch registering
     + WatchesCollection and BreakpointsCollection stored in desk file
     + WatchesCollection and BreakpointsCollection stored in desk file
     * Syntax highlighting was broken
     * Syntax highlighting was broken