3009 |
(let ((guile-user-module (resolve-module '(guile-user)))) |
(let ((guile-user-module (resolve-module '(guile-user)))) |
3010 |
|
|
3011 |
;; Load emacs interface support if emacs option is given. |
;; Load emacs interface support if emacs option is given. |
3012 |
(if (and (module-defined? the-root-module 'use-emacs-interface) |
(if (and (module-defined? guile-user-module 'use-emacs-interface) |
3013 |
(module-ref the-root-module 'use-emacs-interface)) |
(module-ref guile-user-module 'use-emacs-interface)) |
3014 |
(load-emacs-interface)) |
(load-emacs-interface)) |
3015 |
|
|
3016 |
;; Use some convenient modules (in reverse order) |
;; Use some convenient modules (in reverse order) |