From eb3864fbedfa342e7eb9a49467113d0bee88523d Mon Sep 17 00:00:00 2001 From: unknown_lamer Date: Thu, 23 Jun 2005 21:10:18 +0000 Subject: [PATCH] [project @ 2005-06-23 21:10:18 by unknown_lamer] Added scripts/bot.scm which exports the bobot++ interface to other modules --- ChangeLog | 3 +++ NEWS | 3 +++ configure.ac | 2 ++ scripts/Makefile.am | 7 ++++++- scripts/bobot-utils.scm | 1 + scripts/bot.scm | 10 ++++++++++ 6 files changed, 25 insertions(+), 1 deletion(-) create mode 100644 scripts/bot.scm diff --git a/ChangeLog b/ChangeLog index e8179ab..297e9b7 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,8 @@ 2005-06-23 Clinton Ebadi + * scripts/bot.scm: Added file ((bobotpp bot) module for other + modules to gain access to bobot++ interface) + * source/Commands.C (Notice): Commented out check/abort if target is a channel (there doesn't seem to be a reason for this to not work) diff --git a/NEWS b/NEWS index 9fa7ab9..5378618 100644 --- a/NEWS +++ b/NEWS @@ -22,6 +22,9 @@ Version 2.1.8: etc.) + Message Sending * Implemented bot:notice + + Misc + * Added (bobotpp bot) module that modules may use to gain access + to the bobot++ functions Version 2.1.7: diff --git a/configure.ac b/configure.ac index aed0c21..9831ba6 100644 --- a/configure.ac +++ b/configure.ac @@ -30,6 +30,7 @@ AC_ARG_ENABLE(scripting, [ GUILE_PROGS GUILE_FLAGS + GUILE_SITE_DIR AC_DEFINE(USESCRIPTS,1) AC_DEFINE(MULTITHREAD,1) ]) @@ -60,6 +61,7 @@ dnl Checks for libraries. AC_CHECK_LIB(crypt, crypt, [LDFLAGS="-lcrypt $LDFLAGS]") AC_CHECK_LIB(socket, socket, [LDFLAGS="-lsocket $LDFLAGS]") AC_CHECK_LIB(nsl, connect, [LDFLAGS="-lnsl $LDFLAGS]") + dnl CC++ is special (no function to check_lib on dnl AC_CHECK_PROG(CCGNU_FOUND, [ccgnu2-config], dnl [yes], [no]) diff --git a/scripts/Makefile.am b/scripts/Makefile.am index 05d6cee..a6d48ad 100644 --- a/scripts/Makefile.am +++ b/scripts/Makefile.am @@ -1,3 +1,8 @@ scriptsdir = $(datadir)/bobotpp/scripts -scripts_DATA = bobot-utils.scm \ No newline at end of file +scripts_DATA = bobot-utils.scm + +guilesitebotdir = @GUILE_SITE@/bobotpp +guilesitebot_DATA = bot.scm + +EXTRA_DIST = $(scripts_DATA) $(guilesitebot_DATA) \ No newline at end of file diff --git a/scripts/bobot-utils.scm b/scripts/bobot-utils.scm index 116c8c4..afb9f36 100644 --- a/scripts/bobot-utils.scm +++ b/scripts/bobot-utils.scm @@ -15,6 +15,7 @@ (string-append (getenv "HOME") "/.bobotpp/scripts/") bot:sys-scripts-dir)) + (define-public %bot:load-extensions %load-extensions) ;;; bot:log: Write as many messages as you want to the log. If the diff --git a/scripts/bot.scm b/scripts/bot.scm new file mode 100644 index 0000000..271f286 --- /dev/null +++ b/scripts/bot.scm @@ -0,0 +1,10 @@ +;;; Bobot++ Module for for giving access to bobot++ commands to other +;;; scheme modules + +;;; This file is covered by the GPL version 2 or (at your option) any +;;; later version + +(define-module (bobotpp bot)) + +(set-module-uses! %module-public-interface + (list the-bot-module)) \ No newline at end of file -- 2.20.1