diff --git a/cde/programs/dtdocbook/doc2sdl/docbook.tcl b/cde/programs/dtdocbook/doc2sdl/docbook.tcl
index 04748a4e1..08b422827 100755
--- a/cde/programs/dtdocbook/doc2sdl/docbook.tcl
+++ b/cde/programs/dtdocbook/doc2sdl/docbook.tcl
@@ -1,3 +1,4 @@
+#!/usr/bin/tclsh
 # set the global variables
 set nextId        0  ;# gets incremented before each use