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 [email protected]
