diff options
Diffstat (limited to 'emacs')
-rw-r--r-- | emacs/guile-emacs.scm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/emacs/guile-emacs.scm b/emacs/guile-emacs.scm index b345072ff..995d0d6eb 100644 --- a/emacs/guile-emacs.scm +++ b/emacs/guile-emacs.scm @@ -125,4 +125,13 @@ apropos-fold-all) (lambda (p1 p2) (string<? (car p1) (car p2))))) +;;; +;;; Guile 1.4 compatibility +;;; + +(define object->string + (if (defined? 'object->string) + object->string + (lambda (x) (format #f "~S" x)))) + ;;; guile-emacs.scm ends here |