diff options
Diffstat (limited to 'contrib/genrpbindings')
-rwxr-xr-x | contrib/genrpbindings | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/genrpbindings b/contrib/genrpbindings index 021d854..250e03d 100755 --- a/contrib/genrpbindings +++ b/contrib/genrpbindings @@ -74,7 +74,7 @@ while (<ACTIONS_C>) { last if (m!/\*\@end !); if (/{\"(.+)\".+},/) { $nbindings++; - print PERL "sub abort { return rp_cmd (\"$1\"); }"; + print PERL "sub $1 { return rp_cmd (\"$1\", \@_); }"; print ELISP "(defun-ratpoison $1)"; } } |