Mercurial > hg > egg-tcls
comparison feeds.tcl @ 605:1d39db72e190
feeds: Rename SQLite3 database filename configuration variable.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Mon, 08 Feb 2021 12:37:33 +0200 |
| parents | b524a6e4be63 |
| children | 179fc8150090 |
comparison
equal
deleted
inserted
replaced
| 604:543f1d72361e | 605:1d39db72e190 |
|---|---|
| 108 } | 108 } |
| 109 } | 109 } |
| 110 } | 110 } |
| 111 | 111 |
| 112 if {$nresults > 0} { | 112 if {$nresults > 0} { |
| 113 if {![catch {set ufile [open "${feeds_dbfile}.time" w 0600]} uerrmsg]} { | 113 if {![catch {set ufile [open "${feeds_db_file}.time" w 0600]} uerrmsg]} { |
| 114 puts $ufile [clock seconds] | 114 puts $ufile [clock seconds] |
| 115 close $ufile | 115 close $ufile |
| 116 } else { | 116 } else { |
| 117 feeds_log "Could not write timefile: ${uerrmsg}" | 117 feeds_log "Could not write timefile: ${uerrmsg}" |
| 118 } | 118 } |
| 332 #------------------------------------------------------------------------- | 332 #------------------------------------------------------------------------- |
| 333 # Script initialization | 333 # Script initialization |
| 334 #------------------------------------------------------------------------- | 334 #------------------------------------------------------------------------- |
| 335 putlog "$feeds_message" | 335 putlog "$feeds_message" |
| 336 | 336 |
| 337 if {[catch {sqlite3 feeds_dbh $feeds_dbfile} uerrmsg]} { | 337 if {[catch {sqlite3 feeds_dbh $feeds_db_file} uerrmsg]} { |
| 338 putlog "Could not open SQLite3 database '${feeds_dbfile}': ${uerrmsg}" | 338 putlog "Could not open SQLite3 database '${feeds_db_file}': ${uerrmsg}" |
| 339 exit 2 | 339 exit 2 |
| 340 } | 340 } |
| 341 | 341 |
| 342 if {[info exists feeds_running]} { | 342 if {[info exists feeds_running]} { |
| 343 set feeds_last [expr [clock seconds] - $feeds_running] | 343 set feeds_last [expr [clock seconds] - $feeds_running] |