summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog2
-rwxr-xr-xcontrib/genrpbindings4
2 files changed, 4 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 285882b..cfa1857 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
2004-11-11 Shawn Betts <katia_dilkina@verizon.net>
+ * contrib/genrpbindings: fix up path to ratpoison binary
+
* src/actions.c (cmd_ratclick): new function
(cmd_ratrelwarp): likewise
(cmd_ratwarp): likewise
diff --git a/contrib/genrpbindings b/contrib/genrpbindings
index 224a84c..60573bf 100755
--- a/contrib/genrpbindings
+++ b/contrib/genrpbindings
@@ -34,7 +34,7 @@
$\="\n";
# set this to your rp binary
-$RATPOISON="/home/sabetts/src/ratpoison/src/ratpoison";
+$RATPOISON=$ENV{RATPOISON} || "ratpoison";
# open source file
$ACTIONS_C="../src/actions.c";
@@ -101,7 +101,7 @@ print COMMONLISP <<PREAMBLE;
(in-package :ratpoison)
-(defvar ratpoison-program "/home/sabetts/src/ratpoison/src/ratpoison")
+(defvar ratpoison-program "$RATPOISON")
(defmacro defun-ratpoison (cmd)
(let ((sym (intern (concatenate 'string "RP-" (symbol-name cmd)))))