Revision: 42348
http://brlcad.svn.sourceforge.net/brlcad/?rev=42348&view=rev
Author: starseeker
Date: 2011-01-16 23:36:28 +0000 (Sun, 16 Jan 2011)
Log Message:
-----------
Use package require tkpng. If it's not working, let's figure out why.
Modified Paths:
--------------
brlcad/trunk/src/tclscripts/archer/LoadArcherLibs.tcl
Modified: brlcad/trunk/src/tclscripts/archer/LoadArcherLibs.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/LoadArcherLibs.tcl 2011-01-16
23:20:52 UTC (rev 42347)
+++ brlcad/trunk/src/tclscripts/archer/LoadArcherLibs.tcl 2011-01-16
23:36:28 UTC (rev 42348)
@@ -30,24 +30,13 @@
global tcl_platform
# load tkpng
- if {$tcl_platform(platform) == "windows"} {
- set ext "dll"
- set tkpngdir [bu_brlcad_root "bin"]
- } else {
- set ext "so"
- set tkpngdir [bu_brlcad_root "lib"]
- if {![file exists $tkpngdir]} {
- set tkpngdir [file join [bu_brlcad_data "src"] other tkpng .libs]
- }
- }
-
- # can't use sharedlibextension without changing tkpng build
- if {![file exists [file join $tkpngdir tkpng.$ext]]} {
- puts "ERROR: Unable to initialize ArcherCore imagery"
+ if { [catch {package require tkpng} _initialized] } {
+ puts "$_initialized"
+ puts ""
+ puts "ERROR: Unable to load tkpng"
exit 1
}
- load [file join $tkpngdir tkpng.$ext]
if { [catch {package require Swidgets} _initialized] } {
puts "$_initialized"
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
