Tkabber plugins

Check-in [60440eddc0]
Login

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

Overview
Comment:Use zero padding when formatting an OTR fingerprint for display.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 60440eddc0c605c20beaf773454afee409cc168e
User & Date: sgolovan 2017-03-27 12:13:44
Context
2017-03-28
07:45
Add new plugin: sensible-copy. This plugin modifies the behaviour of "copy selection" action in chat windows by copying the text from either the input chat window or the chat log window, depending on which one has a text selected. check-in: f51aa371d9 user: khomoutov tags: trunk
2017-03-27
12:13
Use zero padding when formatting an OTR fingerprint for display. check-in: 60440eddc0 user: sgolovan tags: trunk
2016-10-11
04:16
Do not include own JID into the OTR request message. check-in: b965b70d39 user: sgolovan tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to otr/tclotr/ChangeLog.






1
2
3
4
5
6
7





2016-01-04  Sergei Golovan  <sgolovan@nes.ru>

	* otr.tcl: Reset the keys counter after the AKE completion in case
	  when the correspondent's keys have been changed.

2016-01-02  Sergei Golovan  <sgolovan@nes.ru>

>
>
>
>
>







1
2
3
4
5
6
7
8
9
10
11
12
2017-03-27  Sergei Golovan  <sgolovan@nes.ru>

	* otr.tcl: Use zero padding when formatting an OTR fingerprint for
	  display.

2016-01-04  Sergei Golovan  <sgolovan@nes.ru>

	* otr.tcl: Reset the keys counter after the AKE completion in case
	  when the correspondent's keys have been changed.

2016-01-02  Sergei Golovan  <sgolovan@nes.ru>

Changes to otr/tclotr/otr.tcl.

317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
            return ""
        }
    }

    binary scan [::otr::crypto::DSAFingerprint $key] Iu* nums
    set res {}
    foreach n $nums {
        lappend res [format %X $n]
    }
    join $res
}

# ::otr::ssid --

proc ::otr::ssid {token} {







|







317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
            return ""
        }
    }

    binary scan [::otr::crypto::DSAFingerprint $key] Iu* nums
    set res {}
    foreach n $nums {
        lappend res [format %08X $n]
    }
    join $res
}

# ::otr::ssid --

proc ::otr::ssid {token} {