diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-04-30 00:03:22 +0200 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-04-30 00:03:22 +0200 |
commit | 6f2cfa48bad0c2a55f007b561d0953c8e5557c31 (patch) | |
tree | 3145ca185e2658830d7ead4bbbd2d76e8adf1a05 /elisp/geiser-base.el | |
parent | 5ff75890a9b1dbbba5b6a76fd770cb4d2ff72fcc (diff) | |
download | geiser-6f2cfa48bad0c2a55f007b561d0953c8e5557c31.tar.gz geiser-6f2cfa48bad0c2a55f007b561d0953c8e5557c31.tar.bz2 |
PLT: Help fix.
Diffstat (limited to 'elisp/geiser-base.el')
-rw-r--r-- | elisp/geiser-base.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/elisp/geiser-base.el b/elisp/geiser-base.el index 362930d..4133245 100644 --- a/elisp/geiser-base.el +++ b/elisp/geiser-base.el @@ -97,6 +97,11 @@ (insert str) (put-text-property p (point) 'face face))) +(defmacro geiser--scheme-indent (&rest pairs) + `(progn ,@(mapcar (lambda (p) + `(put ',(car p) 'scheme-indent-function ',(cadr p))) + pairs))) + (provide 'geiser-base) ;;; geiser-base.el ends here |