From 86e64f0b104b878f799fdcf1fb920abeb499d0c6 Mon Sep 17 00:00:00 2001
From: stv <stv@opencascade.com>
Date: Thu, 11 Jun 2015 15:01:40 +0300
Subject: [PATCH] Fix for XDE Draw building.

---
 src/OS/Draw.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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"
-- 
2.39.5