System.Data.SQLite
Check-in [c9bb751d40]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:In the vendor-specific initialization file, skip setting the TestPath property of the Eagle interpreter if it already has the correct value.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: c9bb751d401f35a0a7505507bd9f3fdb6f4ae701
User & Date: mistachkin 2011-11-15 05:20:11
Context
2011-11-15
05:53
More doc updates for release 77. check-in: 8f2d20133b user: mistachkin tags: trunk
05:20
In the vendor-specific initialization file, skip setting the TestPath property of the Eagle interpreter if it already has the correct value. check-in: c9bb751d40 user: mistachkin tags: trunk
05:14
Merge all diagnostic enhancements and fixes related to ticket [e30b820248] to trunk. check-in: c64aaed9f4 user: mistachkin tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to Externals/Eagle/lib/Eagle1.0/vendor.eagle.

   139    139         #
   140    140         # NOTE: Directory not found, return failure.
   141    141         #
   142    142         return false
   143    143       }
   144    144   
   145    145       proc setupInterpreterTestPath { channel dir quiet } {
   146         -      object invoke -flags +NonPublic Interpreter.GetActive TestPath $dir
          146  +      set testPath [object invoke -flags +NonPublic Interpreter.GetActive \
          147  +          TestPath]
          148  +
          149  +      if {$dir ne $testPath} then {
          150  +        object invoke -flags +NonPublic Interpreter.GetActive TestPath $dir
   147    151   
   148         -      if {!$quiet} then {
   149         -        puts -nonewline $channel [appendArgs \
   150         -            "Set interpreter test path to \"" $dir \".\n]
          152  +        if {!$quiet} then {
          153  +          puts -nonewline $channel [appendArgs \
          154  +              "Set interpreter test path to \"" $dir \".\n]
          155  +        }
   151    156         }
   152    157       }
   153    158   
   154    159       checkForTestOverrides stdout \
   155    160           [list binary_directory build_base_directory build_directory \
   156    161                 common_directory datetime_format test_configuration \
   157    162                 test_year] false