OpenPKG CVS Repository http://cvs.openpkg.org/ ____________________________________________________________________________
Server: cvs.openpkg.org Name: Ralf S. Engelschall Root: /v/openpkg/cvs Email: [EMAIL PROTECTED] Module: openpkg-src Date: 18-May-2005 11:47:00 Branch: HEAD Handle: 2005051810470000 Modified files: openpkg-src/ircii ircii.spec rse.rc Log: ok, now that I've got totally crazy with ircII programming, add one more hack to my RSE script: the possibility to execute an event (can be even an external command like 'wmctrl' to raise the window) to receive my attention in case someone speaks about me or to me in public ;-) Summary: Revision Changes Path 1.54 +1 -1 openpkg-src/ircii/ircii.spec 1.6 +36 -3 openpkg-src/ircii/rse.rc ____________________________________________________________________________ patch -p0 <<'@@ .' Index: openpkg-src/ircii/ircii.spec ============================================================================ $ cvs diff -u -r1.53 -r1.54 ircii.spec --- openpkg-src/ircii/ircii.spec 16 May 2005 12:26:21 -0000 1.53 +++ openpkg-src/ircii/ircii.spec 18 May 2005 09:47:00 -0000 1.54 @@ -33,7 +33,7 @@ Group: Network License: BSD Version: 20040820 -Release: 20050516 +Release: 20050518 # list of sources Source0: ftp://ircii.warped.com/pub/ircII/ircii-%{version}.tar.gz @@ . patch -p0 <<'@@ .' Index: openpkg-src/ircii/rse.rc ============================================================================ $ cvs diff -u -r1.5 -r1.6 rse.rc --- openpkg-src/ircii/rse.rc 16 May 2005 12:26:21 -0000 1.5 +++ openpkg-src/ircii/rse.rc 18 May 2005 09:47:00 -0000 1.6 @@ -110,14 +110,47 @@ msg $0 $alias.oops } +# Convenience Attention Checking +set exec_protection off +^assign alias.attention.mode off +^assign alias.attention.event echo *** ATTENTION, PLEASE! *** +alias attention { + if ([$0] == [on]) { + ^assign alias.attention.mode on + } + if ([$0] == [off]) { + ^assign alias.attention.mode off + } + if ([$0] == [event]) { + ^assign alias.attention.event $1- + } + echo *** Attention: mode ${alias.attention.mode}, event ${alias.attention.event} +} +alias __attention_check { + if ([$alias.attention.mode] == [on]) { + if ( [$0] == [${N}:] \ + || match(${N} $*) != [0] \ + || match(${N}, $*) != [0] \ + || match(${N}; $*) != [0] \ + || match(${N}. $*) != [0] \ + || match(${N}: $*) != [0] \ + || match(${N}! $*) != [0] \ + || match(${N}\\? $*) != [0] ) { + $alias.attention.event + ^assign alias.attention.mode off + timer 10 ^assign alias.attention.mode on + } + } +} + # Display Formatting set lastlog 1000 set input_prompt >\ on ^send_public * echo $lformat(8 $N:) $1- -on ^public * echo $lformat(8 $0:) $2- +on ^public * echo $lformat(8 $0:) $2-;__attention_check $2- on ^send_msg * echo ${N} -> $0: $1- -on ^public_other * echo $1 <- $0: $2- -on ^public_msg * echo $1 <- $0: $2- +on ^public_other * echo $1 <- $0: $2-;__attention_check $2- +on ^public_msg * echo $1 <- $0: $2-;__attention_check $2- on ^msg * echo $N <- $0: $1- on ^msg_group * echo $1 <- $0: $2- on ^send_notice * echo ${N} ~> $0: $1- @@ . ______________________________________________________________________ The OpenPKG Project www.openpkg.org CVS Repository Commit List openpkg-cvs@openpkg.org