From 47e34d7ed03aee243b65083af07fdab370b4653a Mon Sep 17 00:00:00 2001 From: mkv Date: Wed, 26 Jul 2017 16:57:08 +0300 Subject: [PATCH] Test for 0023671: pload function does not work if DRAWDEFAULT file has win format --- tests/bugs/demo/bug23671 | 40 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 40 insertions(+) create mode 100755 tests/bugs/demo/bug23671 diff --git a/tests/bugs/demo/bug23671 b/tests/bugs/demo/bug23671 new file mode 100755 index 0000000000..b6dd7dd3f3 --- /dev/null +++ b/tests/bugs/demo/bug23671 @@ -0,0 +1,40 @@ +puts "TODO CR23671 Linux: Error" +puts "TODO CR23671 Linux: Draw_Failure: Could not open" + +puts "============" +puts "CR23671" +puts "============" +puts "" +########################################################################################################## +# pload function does not work if $DRAWDEFAULT file has win format +########################################################################################################## + +set aDrawPlugin [locate_data_file DrawPlugin] +set aDrawPluginDefaults [ file dirname ${aDrawPlugin} ] + +dgetenv CSF_DrawPluginDefaults +dgetenv DRAWDEFAULT + +dsetenv CSF_DrawPluginDefaults ${aDrawPluginDefaults} +dsetenv DRAWDEFAULT ${aDrawPlugin} + +dgetenv CSF_DrawPluginDefaults +dgetenv DRAWDEFAULT + +if [catch {pload} info] { + puts "Error: pload function does not work if \$DRAWDEFAULT file has win format" +} else { + puts "OK: pload function work if \$DRAWDEFAULT file has win format" +} + +if [catch {pload -DrawPlugin} info] { + puts "Error: pload function does not work if \$DRAWDEFAULT file has win format" +} else { + puts "OK: pload function work if \$DRAWDEFAULT file has win format" +} + +if [catch {pload XDE} info] { + puts "Error: pload function does not work if \$DRAWDEFAULT file has win format" +} else { + puts "OK: pload function work if \$DRAWDEFAULT file has win format" +} -- 2.39.5