Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Fixed bug with names of temporary arrays clash. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
0deb65402de153d80240b45c91c9cc33 |
| User & Date: | sgolovan 2016-01-13 08:13:44 |
Context
|
2016-01-13
| ||
| 09:15 | Made the 'current' subcommand for a combobox a synonym for 'getvalue' ('current' is taken from ttk::combobox). check-in: d32f5868fc user: sgolovan tags: trunk | |
| 08:13 | Fixed bug with names of temporary arrays clash. check-in: 0deb65402d user: sgolovan tags: trunk | |
|
2016-01-12
| ||
| 07:50 | Read the logged messages not only for the JID which chat window is being opened, but also for all JIDs in a metacontact it belongs. This option is disabled by default. Since the metacontacts info isn't cached locally, this feature doesn't work for windows which open when saved state is restored on Tkabber start. check-in: 8fd4536226 user: sgolovan tags: trunk | |
Changes
Changes to ChangeLog.
1 2 3 4 5 6 7 | 2016-01-12 Sergei Golovan <sgolovan@nes.ru> * plugins/chat/log_on_open.tcl, plugins/chat/logger.tcl: Read the logged messages not only for the JID which chat window is being opened, but also for all JIDs in a metacontact it belongs. This option is disabled by default. Since the metacontacts info isn't cached locally, this feature doesn't work for windows which open | > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 | 2016-01-13 Sergei Golovan <sgolovan@nes.ru> * plugins/chat/logger.tcl: Fixed bug with names of temporary arrays clash. 2016-01-12 Sergei Golovan <sgolovan@nes.ru> * plugins/chat/log_on_open.tcl, plugins/chat/logger.tcl: Read the logged messages not only for the JID which chat window is being opened, but also for all JIDs in a metacontact it belongs. This option is disabled by default. Since the metacontacts info isn't cached locally, this feature doesn't work for windows which open |
| ︙ | ︙ |
Changes to plugins/chat/logger.tcl.
| ︙ | ︙ | |||
539 540 541 542 543 544 545 |
if {$max == 0 || $interval == 0} {
return {}
}
foreach jid $jids {
set logfile [jid_to_filename $jid]
foreach month [get_subdirs $logfile] {
| | | | | 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 |
if {$max == 0 || $interval == 0} {
return {}
}
foreach jid $jids {
set logfile [jid_to_filename $jid]
foreach month [get_subdirs $logfile] {
lappend logs($month) $logfile
}
}
set messages {}
set curseconds [clock seconds]
set max1 [expr {$max - 1}]
foreach m [lsort -decreasing [array names logs]] {
foreach logfile $logs($m) {
catch {
lappend messages {*}[read_hist_from_file $logfile $m]
}
}
set messages [lsort -increasing -index 1 $messages]
if {$interval > 0} {
|
| ︙ | ︙ |