From: stv <stv@opencascade.com>
Date: Thu, 11 Jun 2015 12:01:40 +0000 (+0300)
Subject: Fix for XDE Draw building.
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=2e20c52658c8488c01fabf96ecdbaaa649366056;p=occt-copy.git

Fix for XDE Draw building.
---

diff --git a/src/OS/Draw.tcl b/src/OS/Draw.tcl
index 01dab2fa67..e7ca69f003 100644
--- a/src/OS/Draw.tcl
+++ b/src/OS/Draw.tcl
@@ -15,7 +15,7 @@
 ;# Liste des toolkits WOK sous forme de full path
 ;# 
 proc Draw:toolkits { } {
-    set aResult [list TKDraw TKTopTest TKViewerTest TKXSDRAW TKDCAF TKXDEDRAW TKTObjDRAW TKQADraw]
+    set aResult [list TKDraw TKTopTest TKViewerTest TKVCAF TKXSDRAW TKDCAF TKXDEDRAW TKTObjDRAW TKQADraw]
 
     if { [info exists ::env(HAVE_VTK)] && $::env(HAVE_VTK) == "true" } {
       lappend aResult "TKIVtkDraw"