Mercurial > hg > egg-tcls

comparison config.quotedb.example @ 478:32f0aba3ab9b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
quotedb: Make more things configurable.
author Matti Hamalainen <ccr@tnsp.org>
date Fri, 25 Jan 2019 14:23:36 +0200
parents ac66900fd066
children 4e19db35cdab
comparison
equal deleted inserted replaced
477:6773d97a3de2 478:32f0aba3ab9b
75 75
76 set qdb_msg_update_too_old "%1 quote #%2 vanhempi kuin %3 minuuttia, ei voida päivittää." 76 set qdb_msg_update_too_old "%1 quote #%2 vanhempi kuin %3 minuuttia, ei voida päivittää."
77 77
78 set qdb_msg_not_found "%1 #%2 ei löydy, tai se ei kuulu käyttäjälle '%3'." 78 set qdb_msg_not_found "%1 #%2 ei löydy, tai se ei kuulu käyttäjälle '%3'."
79 79
80 set qdb_msg_stats "%1-tilastot: %2 quotea, %3 annettua ääntä."
80 81
81 set qdb_msg_help "%1 add <teksti>|update <id> <teksti>|del <id>|find <parametrit>|vote \[<id> <1|-1>\]|top3" 82 set qdb_msg_help "%1 add <teksti>|update <id> <teksti>|del <id>|find <parametrit>|vote \[<id> <1|-1>\]|top3"
82 83
83 84
84 ### 85 ###
86 ### 87 ###
87 88
88 # Bind !quote -command for table "quotedb" 89 # Bind !quote -command for table "quotedb"
89 bind pub - !quote quote_pub_cmd 90 bind pub - !quote quote_pub_cmd
90 bind msg - !quote quote_msg_cmd 91 bind msg - !quote quote_msg_cmd
91 proc quote_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!quote" "quotedb" $unick $uhost $uhand $uchan $utext 1 } 92 proc quote_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!quote" "quotedb" $unick $uhost $uhand $uchan $utext 1 ""}
92 proc quote_msg_cmd {unick uhost uhand utext} { qdb_command "quote" "quotedb" $unick $uhost $uhand "" $utext 0 } 93 proc quote_msg_cmd {unick uhost uhand utext} { qdb_command "!quote" "quotedb" $unick $uhost $uhand "" $utext 0 ""}
93 94
94 95
95 bind pub - !spede spede_pub_cmd 96 bind pub - !spede spede_pub_cmd
96 bind msg - !spede spede_msg_cmd 97 bind msg - !spede spede_msg_cmd
97 proc spede_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!spede" "spededb" $unick $uhost $uhand $uchan $utext 1 } 98 proc spede_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!spede" "spededb" $unick $uhost $uhand $uchan $utext 1 ""}
98 proc spede_msg_cmd {unick uhost uhand utext} { qdb_command "spede" "spededb" $unick $uhost $uhand "" $utext 0 } 99 proc spede_msg_cmd {unick uhost uhand utext} { qdb_command "!spede" "spededb" $unick $uhost $uhand "" $utext 0 ""}
99 100
100 bind pub - !mn mn_pub_cmd 101 bind pub - !mn mn_pub_cmd
101 bind msg - !mn mn_msg_cmd 102 bind msg - !mn mn_msg_cmd
102 proc mn_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!mn" "mndb" $unick $uhost $uhand $uchan $utext 1 } 103 proc mn_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!mn" "mndb" $unick $uhost $uhand $uchan $utext 1 ""}
103 proc mn_msg_cmd {unick uhost uhand utext} { qdb_command "mn" "mndb" $unick $uhost $uhand "" $utext 0 } 104 proc mn_msg_cmd {unick uhost uhand utext} { qdb_command "!mn" "mndb" $unick $uhost $uhand "" $utext 0 ""}
104 105
105 bind pub - !tuksu tuksu_pub_cmd 106 bind pub - !tuksu tuksu_pub_cmd
106 bind msg - !tuksu tuksu_msg_cmd 107 bind msg - !tuksu tuksu_msg_cmd
107 proc tuksu_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!tuksu" "tuksudb" $unick $uhost $uhand $uchan $utext 1 } 108 proc tuksu_pub_cmd {unick uhost uhand uchan utext} { qdb_command "!tuksu" "tuksudb" $unick $uhost $uhand $uchan $utext 1 ""}
108 proc tuksu_msg_cmd {unick uhost uhand utext} { qdb_command "tuksu" "tuksudb" $unick $uhost $uhand "" $utext 0 } 109 proc tuksu_msg_cmd {unick uhost uhand utext} { qdb_command "!tuksu" "tuksudb" $unick $uhost $uhand "" $utext 0 ""}