Perform proper substitution in `skribe.el'.

* emacs/Makefile.am (EXTRA_DIST, lisp_DATA, CLEANFILES): New.
  (dist_lisp_DATA): Remove.
  (.in): New.  Include `substitute.am'.

* emacs/skribe.el: Remove.

* emacs/skribe.el.in (skribe-version): Use `@PACKAGE_VERSION@'.
  (skribe-emacs-dir): Use `@lispdir@'.
  (skribe-docdirs): Use `@docdir@'.
  (skribe-host-scheme-docdirs): Use Guile's URL.

* substitute.am: Substitute `$(lispdir)'.

4 files changed, 19 insertions, 10 deletions

diff --git a/emacs/Makefile.am b/emacs/Makefile.am
index d3cdcf2..85084df 100644
--- a/emacs/Makefile.am
+++ b/emacs/Makefile.am
@@ -1 +1,10 @@
-dist_lisp_DATA = skribe.el
+EXTRA_DIST     = skribe.el.in
+lisp_DATA      = skribe.el
+
+CLEANFILES     = $(lisp_DATA)
+
+include $(top_srcdir)/substitute.am
+
+.in:
+	$(substitute) "$^" > "$@.tmp" &&	\
+	mv "$@.tmp" "$@"
diff --git a/emacs/skribe.el b/emacs/skribe.el
index 6c4563a..23e0e40 100644
--- a/emacs/skribe.el
+++ b/emacs/skribe.el
@@ -25,7 +25,7 @@
 ;*    custom                                                           */
 ;*---------------------------------------------------------------------*/
 ;; skribe version
-(defconst skribe-version "1.2d"
+(defconst skribe-version "0.9.0"
   "*The Skribe version.")
 
 ;; skribe group
@@ -36,19 +36,19 @@
   :group 'processes)
 
 ;; emacs directory
-(defcustom skribe-emacs-dir '"/users/serrano/emacs/site-lisp/bigloo"
+(defcustom skribe-emacs-dir '"/usr/local/share/emacs/site-lisp"
   "*Directory for Skribe Emacs installation."
   :group 'skribe
   :type '(string))
 
 ;; additional directories for online documentation
-(defcustom skribe-docdirs '("/usr/local/doc/skribe-1.2d")
+(defcustom skribe-docdirs '("/usr/local/share/doc/skribilo")
   "*Directories for online documentation."
   :group 'skribe
   :type '(repeat (string)))
 
 ;; Host scheme documentation
-(defcustom skribe-host-scheme-docdirs '("/users/serrano/prgm/project/bigloo/manuals")
+(defcustom skribe-host-scheme-docdirs '("http://www.gnu.org/software/guile/")
   "*URL for hosting Scheme system."
   :group 'skribe
   :type '(string))
diff --git a/emacs/skribe.el.in b/emacs/skribe.el.in
index 1b1ae4f..e324f0d 100644
--- a/emacs/skribe.el.in
+++ b/emacs/skribe.el.in
@@ -25,7 +25,7 @@
 ;*    custom                                                           */
 ;*---------------------------------------------------------------------*/
 ;; skribe version
-(defconst skribe-version "@SKRIBE_RELEASE@"
+(defconst skribe-version "@PACKAGE_VERSION@"
   "*The Skribe version.")
 
 ;; skribe group
@@ -36,19 +36,19 @@
   :group 'processes)
 
 ;; emacs directory
-(defcustom skribe-emacs-dir '"@SKRIBE_EMACSDIR@"
+(defcustom skribe-emacs-dir '"@lispdir@"
   "*Directory for Skribe Emacs installation."
   :group 'skribe
   :type '(string))
 
 ;; additional directories for online documentation
-(defcustom skribe-docdirs '("@SKRIBE_DOCDIR@")
+(defcustom skribe-docdirs '("@docdir@")
   "*Directories for online documentation."
   :group 'skribe
   :type '(repeat (string)))
 
 ;; Host scheme documentation
-(defcustom skribe-host-scheme-docdirs '("@SKRIBE_HOSTSCHEMEDOCDIR@")
+(defcustom skribe-host-scheme-docdirs '("http://www.gnu.org/software/guile/")
   "*URL for hosting Scheme system."
   :group 'skribe
   :type '(string))
diff --git a/substitute.am b/substitute.am
index e0e5c00..33d8a75 100644
--- a/substitute.am
+++ b/substitute.am
@@ -5,7 +5,7 @@ substitute = sed -e 's,[@]guilemoduledir[@],$(guilemoduledir),g'	\
 		 -e 's,[@]abs_top_builddir[@],$(abs_top_builddir),g'	\
 		 -e 's,[@]prefix[@],$(prefix),g'			\
 		 -e 's,[@]docdir[@],$(docdir),g'			\
-		 -e 's,[@]emacsdir[@],$(emacsdir),g'			\
+		 -e 's,[@]lispdir[@],$(lispdir),g'			\
 		 -e 's,[@]GUILE[@],$(GUILE),g'				\
 		 -e 's,[@]PACKAGE_STRING[@],$(PACKAGE_STRING),g'	\
 		 -e 's,[@]PACKAGE_NAME[@],$(PACKAGE_NAME),g'		\