diff options
Diffstat (limited to 'lang/elisp/primitives/guile.scm')
-rw-r--r-- | lang/elisp/primitives/guile.scm | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/lang/elisp/primitives/guile.scm b/lang/elisp/primitives/guile.scm deleted file mode 100644 index 059f2bbad..000000000 --- a/lang/elisp/primitives/guile.scm +++ /dev/null @@ -1,20 +0,0 @@ -(define-module (lang elisp primitives guile) - #:use-module (lang elisp internals fset)) - -;;; {Importing Guile procedures into Elisp} - -;; It may be worthwhile to import some Guile procedures into the Elisp -;; environment. For now, though, we don't do this. - -(if #f - (let ((accessible-procedures - (apropos-fold (lambda (module name var data) - (cons (cons name var) data)) - '() - "" - (apropos-fold-accessible (current-module))))) - (for-each (lambda (name var) - (if (procedure? var) - (fset name var))) - (map car accessible-procedures) - (map cdr accessible-procedures)))) |