Fossil

Check-in [5c674ff2]
Login

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

Overview
Comment:Fix typo.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | testerCleanup
Files: files | file ages | folders
SHA1:5c674ff2711fa4c3633c79b52c63ad7d38a45604
User & Date: mistachkin 2016-03-02 06:46:10
Context
2016-03-02
06:58
Robustify the cleanup process. check-in: ee5214b7 user: mistachkin tags: testerCleanup
06:46
Fix typo. check-in: 5c674ff2 user: mistachkin tags: testerCleanup
06:45
More work... check-in: 29f0328c user: mistachkin tags: testerCleanup
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to test/tester.tcl.

244
245
246
247
248
249
250
251
252
253
254
255
256
257
258

#
# Create and open a new Fossil repository and clean the checkout
#
proc repo_init {{filename ".rep.fossil"}} {
  set_home_to_elsewhere
  set ::tempRepoPath [file join \
      $tempPath repo_[pid] [string trim [clock seconds] -] \
      [file tail [get_script_or_fail]]]
  if {[catch {
    file mkdir $::tempRepoPath
  } error] != 0} {
    error "could not make directory \"$::tempRepoPath\",\
please set TEMP variable in environment: $error"
  }







|







244
245
246
247
248
249
250
251
252
253
254
255
256
257
258

#
# Create and open a new Fossil repository and clean the checkout
#
proc repo_init {{filename ".rep.fossil"}} {
  set_home_to_elsewhere
  set ::tempRepoPath [file join \
      $::tempPath repo_[pid] [string trim [clock seconds] -] \
      [file tail [get_script_or_fail]]]
  if {[catch {
    file mkdir $::tempRepoPath
  } error] != 0} {
    error "could not make directory \"$::tempRepoPath\",\
please set TEMP variable in environment: $error"
  }