| 123456789101112131415161718192021 |
- # Auto op script. Ops everyone in channels set +horgh_autoop
- #
- #
- # Last change Sat Nov 15 17:18:29 PST 2008
- #
- # Created Thu Oct 23 18:32:36 PDT 2008
- # By horgh
- namespace eval horgh_autoop {
- variable output_cmd putserv
- setudef flag horgh_autoop
- bind join -|- * horgh_autoop::horgh_autoop
- }
- proc horgh_autoop::horgh_autoop {nick host hand chan} {
- if {![channel get $chan horgh_autoop]} { return }
- $horgh_autoop::output_cmd "MODE $chan +o $nick"
- }
- putlog "horgh_autoop.tcl loaded"
|