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 | 62a12ad5d23520d93a30c38db083bdbfd248b77e (patch) | |
tree | 0784350c9c18cdfd0d23479475cb9a65890ac8f7 /elisp/geiser-base.el | |
parent | fbd809ff8c48f12d1b13caae70810421aaa0aef4 (diff) | |
download | geiser-guile-62a12ad5d23520d93a30c38db083bdbfd248b77e.tar.gz geiser-guile-62a12ad5d23520d93a30c38db083bdbfd248b77e.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 |