# HG changeset patch # User Matti Hamalainen # Date 1594120967 -10800 # Node ID 137d61a0b5b71af3e08f2edbc893fe427dd84ce7 # Parent a7e44605c93074ad64a702bdfd74814c3d446d3a urllog: Rename two functions. diff -r a7e44605c930 -r 137d61a0b5b7 urllog.tcl --- a/urllog.tcl Tue Jul 07 14:22:16 2020 +0300 +++ b/urllog.tcl Tue Jul 07 14:22:47 2020 +0300 @@ -45,8 +45,8 @@ package require http ### Binding initializations -bind pub - !urlfind urllog_pub_urlfind -bind msg - !urlfind urllog_msg_urlfind +bind pub - !urlfind urllog_pub_cmd_urlfind +bind msg - !urlfind urllog_msg_cmd_urlfind bind pubm - *.* urllog_check_line bind topc - *.* urllog_check_line @@ -614,7 +614,7 @@ #------------------------------------------------------------------------- ### Finding binded functions -proc urllog_pub_urlfind {unick uhost uhand uchan utext} { +proc urllog_pub_cmd_urlfind {unick uhost uhand uchan utext} { global urllog_search_channels if {[utl_match_delim_list $urllog_search_channels $uchan]} { @@ -624,7 +624,7 @@ } -proc urllog_msg_urlfind {unick uhost uhand utext} { +proc urllog_msg_cmd_urlfind {unick uhost uhand utext} { urllog_find $unick $uhand "" $utext 0 return 0 }