Changeset 6165 for branches

Timestamp:

Mar 21, 2016, 7:15:42 AM (9 years ago)

Author:

gah

Message:

don't fail w/ bugreport on non-hub

Location:

branches/1.5/gui/scripts

Files:

• analyzer.tcl (modified) (2 diffs)
• bugreport.tcl (modified) (1 diff)
• imageresult.tcl (modified) (1 diff)

branches/1.5/gui/scripts/analyzer.tcl

@@ -1803 +1803 @@
 #
 itcl::body Rappture::Analyzer::WriteSimsetFile { appName fileName publish } {
-    # The runfiles directory is the root of the filename.
-    # For example, if the simset file is /path/to/myName.sav,
-    # the runfile directory is /path/to/myName
-    if { [file exists $fileName] } {
-    }
+    # The runfiles directory is the root of the filename.  For example, if
+    # the simset file is /path/to/myName.sav, the runfile directory is
+    # /path/to/myName
     set root [file root $fileName]
     if { [file exists $root] } {
@@ -2080 +2078 @@
         }
     } errs] != 0 } {
-        puts stderr "can't load \"$fileName\": zzzzerrs=$errs"
+        puts stderr "can't load \"$fileName\": errs=$errs"
     }
 }

branches/1.5/gui/scripts/bugreport.tcl

@@ -607 +607 @@
                 return 0
             }
-
+            set url [Rappture::Tool::resources -huburl]
+            if { $url == "" } {
+                return 0
+            }
             # if this is a problem launching a job and the tool
             # expects this, then don't bother with automatic reports.

branches/1.5/gui/scripts/imageresult.tcl

@@ -446 +446 @@
     }
     if {"" != $top} {
-        puts stderr top=$top 
         switch -- $option {
             image   { return [$top tkimage] }