diff options
author | Matthew Hunt <mph@FreeBSD.org> | 1998-05-07 05:20:22 +0000 |
---|---|---|
committer | Matthew Hunt <mph@FreeBSD.org> | 1998-05-07 05:20:22 +0000 |
commit | 4c4cb98772f35fac0ef4225066ddf71d75a3d0ff (patch) | |
tree | ba5c8c52878c4299525810f359a4c3bcdcfc7a93 /irc/sirc/scripts | |
parent | Strip binary now. (diff) |
Import of sirc, Yet Another IRC Client. (Is this the "net" equivalent
of Minesweeper in "games"?) This one is written in Perl, so it is
convenient for people who would like to script in Perl.
PR: 6535
Submitted by: Studded@dal.net
Notes
Notes:
svn path=/head/; revision=10890
Diffstat (limited to 'irc/sirc/scripts')
-rw-r--r-- | irc/sirc/scripts/sirc-proto | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/irc/sirc/scripts/sirc-proto b/irc/sirc/scripts/sirc-proto new file mode 100644 index 000000000000..2de5b34e9810 --- /dev/null +++ b/irc/sirc/scripts/sirc-proto @@ -0,0 +1,17 @@ +#!/bin/sh + +PREFIX= +SIRCLIB=${PREFIX}/libexec/sirc ; export SIRCLIB + +if test -z "$SIRCSERVER" && test -z "$IRCSERVER" +then + SIRCSERVER="irc.dal.net" + export SIRCSERVER +fi + +case "$1" in + -d) shift + exec ${PREFIX}/bin/perl5 ${SIRCLIB}/dsirc "$@" + ;; + *) eval exec ${PREFIX}/bin/ssfe $SSFE ${PREFIX}/bin/perl5 ${SIRCLIB}/dsirc \"\$@\" +esac |