Revision: 42192
http://brlcad.svn.sourceforge.net/brlcad/?rev=42192&view=rev
Author: brlcad
Date: 2011-01-13 01:42:38 +0000 (Thu, 13 Jan 2011)
Log Message:
-----------
try a little harder to find data resources so archer can run uninstalled
Modified Paths:
--------------
brlcad/trunk/src/archer/archer
Modified: brlcad/trunk/src/archer/archer
===================================================================
--- brlcad/trunk/src/archer/archer 2011-01-13 01:24:17 UTC (rev 42191)
+++ brlcad/trunk/src/archer/archer 2011-01-13 01:42:38 UTC (rev 42192)
@@ -132,11 +132,20 @@
proc createSplashScreen {} {
global env
- # XXX disabled until tkimg is working better
set useImage 1
if {$useImage} {
- set image [image create photo -file [file join [bu_brlcad_data
"tclscripts"] archer images aboutArcher.png]]
+ # try installed, uninstalled
+ set imgfile [file join [bu_brlcad_data "tclscripts"] archer images
aboutArcher.png]
+ if { ![file exists $imgfile] } {
+ # try src tree
+ set imgfile [file join [bu_brlcad_data "src"] archer images
aboutArcher.png]
+ if { [!file exists $imgfile] } {
+ # try local relative
+ set imgfile [file join tclscripts archer images aboutArcher.png]
+ }
+ }
+ set image [image create photo -file $imgfile]
set ::ArcherCore::splash [Splash .splash -image $image]
} else {
set ::ArcherCore::splash [Splash .splash -message "Loading Archer ...
please wait ..."]
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
Protect Your Site and Customers from Malware Attacks
Learn about various malware tactics and how to avoid them. Understand
malware threats, the impact they can have on your business, and how you
can protect your company and customers by using code signing.
http://p.sf.net/sfu/oracle-sfdevnl
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
