Fossil

Check-in [e264125a]
Login

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

Overview
Comment:Treat 'file normalize' with a bit more skepticism.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | testerCleanup
Files: files | file ages | folders
SHA1:e264125a2cb435fca8c5d0d325dbc4eb84fa98fc
User & Date: mistachkin 2016-03-03 22:12:51
Context
2016-03-05
00:16
Add a '-keep' command line option to the test suite to prevent any test cleanup from taking place. check-in: 95f7fe5a user: mistachkin tags: testerCleanup
2016-03-03
22:12
Treat 'file normalize' with a bit more skepticism. check-in: e264125a user: mistachkin tags: testerCleanup
21:50
Improve handling of setting up the initial temporary directory. check-in: e6e79ac6 user: mistachkin tags: testerCleanup
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to test/tester.tcl.

417
418
419
420
421
422
423


424
425

426
427
428
429
430
431
432
  #
  # NOTE: Check if we can use any of the environment variables.
  #
  foreach name $names {
    set value [getEnvironmentVariable $name]

    if {[string length $value] > 0} then {


      if {[file exists $value] && [file isdirectory $value]} then {
        return [file normalize $value]

      }
    }
  }

  #
  # NOTE: On non-Windows systems, fallback to /tmp if it is usable.
  #







>
>

<
>







417
418
419
420
421
422
423
424
425
426

427
428
429
430
431
432
433
434
  #
  # NOTE: Check if we can use any of the environment variables.
  #
  foreach name $names {
    set value [getEnvironmentVariable $name]

    if {[string length $value] > 0} then {
      set value [file normalize $value]

      if {[file exists $value] && [file isdirectory $value]} then {

        return $value
      }
    }
  }

  #
  # NOTE: On non-Windows systems, fallback to /tmp if it is usable.
  #