adding initilaization (source init.itcl)

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@646 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
kokalj 2004-02-23 12:16:26 +00:00
parent d49ab1ebed
commit cc7d844f82
1 changed files with 6 additions and 3 deletions

View File

@ -19,7 +19,7 @@
# CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#
#
# $Id: pwscf.itcl,v 1.1 2004-02-20 15:12:02 kokalj Exp $
# $Id: pwscf.itcl,v 1.2 2004-02-23 12:16:26 kokalj Exp $
#
tk_setPalette #d9d9d9
@ -30,9 +30,12 @@ option add *Menubar*activeBackground \#007d8d startupFile
option add *Menubar*activeForeground \#ffffff startupFile
option readfile [file join $::env(PWGUI) src pwscf.theme] startupFile
option readfile [file join $::guib::library guib.theme] startupFile
option readfile [file join $::guib::library guib.theme] startupFile
#
# initialization
#
pwscf::init
# ------------------------------------------------------------------------
# create IMAGES