summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2020-07-19 23:00:12 +0100
committerjao <jao@gnu.org>2020-07-19 23:00:12 +0100
commit13f1fbbadf902052da26a1e35415b779a3c3835c (patch)
treeec8450ff326726b704b5919f586e1e42b6c38c7b /elisp
parent847d2ad4c6da462c26c50af1ef7d9cd697f3a5d2 (diff)
downloadgeiser-13f1fbbadf902052da26a1e35415b779a3c3835c.tar.gz
geiser-13f1fbbadf902052da26a1e35415b779a3c3835c.tar.bz2
the long road to doc updates starts with one commit
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-load.el.in9
-rw-r--r--elisp/geiser-reload.el3
-rw-r--r--elisp/geiser.el8
3 files changed, 1 insertions, 19 deletions
diff --git a/elisp/geiser-load.el.in b/elisp/geiser-load.el.in
deleted file mode 100644
index d23c7b9..0000000
--- a/elisp/geiser-load.el.in
+++ /dev/null
@@ -1,9 +0,0 @@
-(defconst geiser-elisp-dir nil)
-(setq geiser-elisp-dir (file-name-directory load-file-name))
-(add-to-list 'load-path geiser-elisp-dir)
-
-(require 'geiser)
-
-(setq geiser-scheme-dir "@abs_top_srcdir@/scheme")
-
-(provide 'geiser-load)
diff --git a/elisp/geiser-reload.el b/elisp/geiser-reload.el
index 287a768..4326613 100644
--- a/elisp/geiser-reload.el
+++ b/elisp/geiser-reload.el
@@ -1,6 +1,6 @@
;;; geiser-reload.el -- unload/load geiser packages
-;; Copyright (C) 2009, 2010, 2012 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009, 2010, 2012, 2020 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -17,7 +17,6 @@
(require 'geiser-custom)
(require 'geiser-base)
(require 'geiser)
-(require 'geiser-load nil t)
(require 'geiser-install nil t)
diff --git a/elisp/geiser.el b/elisp/geiser.el
index eb5e975..6a41b98 100644
--- a/elisp/geiser.el
+++ b/elisp/geiser.el
@@ -21,14 +21,6 @@
"Directory containing Geiser's Elisp files.")
;;;###autoload
-(defconst geiser-scheme-dir
- (let ((d (expand-file-name "./scheme/" geiser-elisp-dir)))
- (if (file-directory-p d)
- d
- (expand-file-name "../scheme/" geiser-elisp-dir)))
- "Directory containing Geiser's Scheme files.")
-
-;;;###autoload
(add-to-list 'load-path (directory-file-name geiser-elisp-dir))