tests/caf/begin

   1 # File : begin
   2
   3 if { [array get Draw_Groups "DF basic commands"] == "" } {
   4         pload DCAF
   5 }
   6
   7 chrono qat start
   8 # Create a new document and set UndoLimit
   9 NewDocument D MDTV-Standard
  10
  11 #NewDocument D
  12 cpulimit 300
  13 UndoLimit D 100
  14
  15 # Open a transaction
  16 NewCommand D