diff --git a/src/DrawResources/DrawDefault b/src/DrawResources/DrawDefault
index 3f0b7c1a2a..a70e3ae7cc 100755
--- a/src/DrawResources/DrawDefault
+++ b/src/DrawResources/DrawDefault
@@ -87,7 +87,7 @@ if { [file readable $draw_appli_init_file] } {
 
 # on Windows, set special handler to update automatically environment variables
 # in C subsystem when Tcl environment changes (see Mantis issue #23197)
-if { $tcl_platform(platform) == "windows" && ! [catch {dgetenv PATH} res] } {
+if { $tcl_platform(platform) == "windows" && ! [catch {dgetenv PATH}] } {
     proc _update_c_env {envenv var op} { 
         global env
         if { $op == "unset" } {