From 164d3dc35fc82200086c5cecd6b3d2fab236f999 Mon Sep 17 00:00:00 2001
From: cos <cos>
Date: Sun, 26 May 2013 22:29:04 +0200
Subject: Check for and use $RATPOISON during runtime when possible.

---
 contrib/genrpbindings | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/contrib/genrpbindings b/contrib/genrpbindings
index 0f924d3..ee91043 100755
--- a/contrib/genrpbindings
+++ b/contrib/genrpbindings
@@ -61,7 +61,7 @@ open PYTHON, ">$PYTHON_FILE" or die "Can't create $PYTHON_FILE";
 
 # PERL preamble
 print PERL 'package Ratpoison;';
-print PERL '$RATPOISON="',$RATPOISON,'";';
+print PERL '$RATPOISON=$ENV{RATPOISON} ? $ENV{RATPOISON} : "',$RATPOISON,'";';
 print PERL 'sub command { my $a = "@_"; $a =~ s/(\')/\'\\\\\'\'/g; return `$RATPOISON -c \'$a\'`; }';
 
 # ELISP preamble
-- 
cgit v1.2.3