4 ######################################################
5 # A draw-command CopyDF fails to copy content of a label
6 ######################################################
10 # Create a new document and set UndoLimit
19 catch { GetReal D 0:2 } catch_result
21 if { $catch_result == 1.2344999999999999 } {
22 puts "OK ${BugNumber}"
24 puts "Faulty ${BugNumber}"