Mercurial > hg > egg-tcls

comparison urllog.tcl @ 425:e5810c52d376

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Bump some copyright years and versions.
author Matti Hamalainen <ccr@tnsp.org>
date Sun, 08 Jan 2017 03:57:05 +0200
parents 825cac46b1cb
children 102dc89488af
comparison
equal deleted inserted replaced
424:825cac46b1cb 425:e5810c52d376
1 ########################################################################## 1 ##########################################################################
2 # 2 #
3 # URLLog v2.4.2 by Matti 'ccr' Hamalainen <ccr@tnsp.org> 3 # URLLog v2.4.3 by Matti 'ccr' Hamalainen <ccr@tnsp.org>
4 # (C) Copyright 2000-2015 Tecnic Software productions (TNSP) 4 # (C) Copyright 2000-2017 Tecnic Software productions (TNSP)
5 # 5 #
6 # This script is freely distributable under GNU GPL (version 2) license. 6 # This script is freely distributable under GNU GPL (version 2) license.
7 # 7 #
8 ########################################################################## 8 ##########################################################################
9 # 9 #
34 34
35 ########################################################################## 35 ##########################################################################
36 # No need to look below this line 36 # No need to look below this line
37 ########################################################################## 37 ##########################################################################
38 set urllog_name "URLLog" 38 set urllog_name "URLLog"
39 set urllog_version "2.4.2" 39 set urllog_version "2.4.3"
40 40
41 set urllog_tld_list [split $urllog_tld_list ","] 41 set urllog_tld_list [split $urllog_tld_list ","]
42 set urllog_httprep [split "\@|%40|{|%7B|}|%7D|\[|%5B|\]|%5D" "|"] 42 set urllog_httprep [split "\@|%40|{|%7B|}|%7D|\[|%5B|\]|%5D" "|"]
43 43
44 44
52 bind pubm - *.* urllog_check_line 52 bind pubm - *.* urllog_check_line
53 bind topc - *.* urllog_check_line 53 bind topc - *.* urllog_check_line
54 54
55 55
56 ### Initialization messages 56 ### Initialization messages
57 set urllog_message "$urllog_name v$urllog_version (C) 2000-2015 ccr/TNSP" 57 set urllog_message "$urllog_name v$urllog_version (C) 2000-2017 ccr/TNSP"
58 putlog "$urllog_message" 58 putlog "$urllog_message"
59 59
60 ### Miscellaneous init messages 60 ### Miscellaneous init messages
61 if {$urllog_extra_checks != 0} { 61 if {$urllog_extra_checks != 0} {
62 putlog " (Additional URL validity checks enabled)" 62 putlog " (Additional URL validity checks enabled)"