Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-ffi/index.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-ffi/*.html
+Index: /usr/share/doc/mit-scheme-pucked/html/ffi/index.html
+Files: /usr/share/doc/mit-scheme-pucked/html/ffi/*.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-ffi.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/ffi.pdf.gz
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-ref/index.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-ref/*.html
+Index: /usr/share/doc/mit-scheme-pucked/html/reference/index.html
+Files: /usr/share/doc/mit-scheme-pucked/html/reference/*.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-ref.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/reference.pdf.gz
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-sos/index.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-sos/*.html
+Index: /usr/share/doc/mit-scheme-pucked/html/sos/index.html
+Files: /usr/share/doc/mit-scheme-pucked/html/sos/*.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-sos.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/sos.pdf.gz
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-user/index.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-user/*.html
+Index: /usr/share/doc/mit-scheme-pucked/html/user/index.html
+Files: /usr/share/doc/mit-scheme-pucked/html/user/*.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-pucked-user.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/user.pdf.gz
-doc/imail/mit-scheme-pucked-imail.info*
-doc/ref-manual/mit-scheme-pucked-ref.info*
-doc/sos/mit-scheme-pucked-sos.info*
-doc/user-manual/mit-scheme-pucked-user.info*
+doc/mit-scheme-pucked.info
dh_autoreconf sh -- -e -x -c \
'for d in src doc; do (cd $$d && autoreconf -f -i) done'
-CONF_FLAGS += --docdir=/usr/share/doc/mit-scheme-pucked
-CONF_FLAGS += --enable-html=/usr/share/doc/mit-scheme-pucked/html
-CONF_FLAGS += --enable-pdf=/usr/share/doc/mit-scheme-pucked/pdf
CONF_FLAGS += --enable-ps=no
override_dh_auto_configure:
docdir = @docdir@
oldincludedir = /usr/include
+PROJECT = @PROJECT@
+
DESTDIR =
top_builddir = .
pdfdir = @pdfdir@
psdir = @psdir@
INST_TARGETS = @INST_TARGETS@
+INSTALL_INFO_PROG = @INSTALL_INFO_PROG@
SUBDIRS = ffi ref-manual sos user-manual
DISTCLEAN_FILES = Makefile make-common config.log config.status
tags TAGS:
-install: install-info-gz install-man $(INST_TARGETS)
+install: install-info-gz install-man install-html $(INST_TARGETS)
-install-info-gz install-info:
+install-info-gz install-info: $(PROJECT).info
$(mkinstalldirs) $(DESTDIR)$(infodir)
if [ ! -e $(DESTDIR)$(infodir)/dir ]; then \
$(INSTALL_DATA) info-dir $(DESTDIR)$(infodir)/dir; fi
+ $(INSTALL_DATA) $(PROJECT).info $(DESTDIR)$(infodir)/.
+ $(INSTALL_INFO_PROG) --info-dir $(DESTDIR)$(infodir)/ $(PROJECT).info
@for D in $(SUBDIRS); do \
echo "making $@ in $${D}";\
( cd $${D} && $(MAKE) $@ ) || exit 1;\
done
+$(PROJECT).info: $(PROJECT).info.in
+ sed -e 's|@SCMDOCDIR@|$(docdir)|g' < $< > $@
+
install-man:
$(mkinstalldirs) $(DESTDIR)$(mandir)/man1
- $(INSTALL_DATA) mit-scheme-pucked.1 $(DESTDIR)$(mandir)/man1/.
+ $(INSTALL_DATA) ${PROJECT}.1 $(DESTDIR)$(mandir)/man1/.
install-html:
$(mkinstalldirs) $(DESTDIR)$(htmldir)
AC_PROG_MAKE_SET
AC_CHECK_PROG([INSTALL_INFO_PROG], [install-info], [install-info], [true])
+PROJECT=mit-scheme-pucked
TARGETS=
INST_TARGETS=
-AC_ARG_ENABLE([html],
- [AC_HELP_STRING([--enable-html], [generate HTML documentation])])
-if test "${enable_html}" = "no"; then
- htmldir=
-elif test "${enable_html:-yes}" != "yes"; then
- htmldir="${enable_html}"
-fi
-test "${htmldir}" = "" || TARGETS="${TARGETS} \$(TARGET_ROOT)/index.html"
-test "${htmldir}" = "" || INST_TARGETS="${INST_TARGETS} install-html"
-AC_SUBST([htmldir])
+# Install docs in subdirectories by medium, in anticipation of dozens
+# of little plugin manuals.
+docdir='$(datarootdir)/doc/$(PROJECT)'
+htmldir='$(docdir)/html'
+pdfdir='$(docdir)/pdf'
+psdir='$(docdir)/ps'
AC_ARG_ENABLE([pdf],
[AC_HELP_STRING([--enable-pdf], [generate PDF documentation])])
fi
test "${pdfdir}" = "" || TARGETS="${TARGETS} \$(TARGET_ROOT).pdf"
test "${pdfdir}" = "" || INST_TARGETS="${INST_TARGETS} install-pdf"
-AC_SUBST([pdfdir])
AC_ARG_ENABLE([ps],
[AC_HELP_STRING([--enable-ps], [generate Postscript documentation])])
fi
test "${psdir}" = "" || TARGETS="${TARGETS} \$(TARGET_ROOT).ps"
test "${psdir}" = "" || INST_TARGETS="${INST_TARGETS} install-ps"
-AC_SUBST([psdir])
+AC_SUBST([PROJECT])
AC_SUBST([TARGETS])
AC_SUBST([INST_TARGETS])
SOURCES = ffi.texinfo prhello.cdecl prhello.scm
TEXINFO_ROOT = ffi
-TARGET_ROOT = mit-scheme-ffi
+TARGET_ROOT = ffi
include $(top_srcdir)/make-common
-\input texinfo @c -*-Texinfo-*-
+\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-ffi
+@setfilename ffi
+@comment From automake's version.texi someday:
@set VERSION 0.2
-@set UPDATED 2011-09-19
-@settitle FFI @value{VERSION}
+@set UPDATED 19 September 2011
+@set SCMVERS 9.2.7
+@settitle MIT/GNU Scheme Pucked FFI Manual
@comment %**end of header
@ifhtml
@end ifnothtml
@copying
-This manual documents @acronym{FFI} @value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked @acronym{FFI} @value{VERSION}.
Copyright @copyright{} 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993,
1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme FFI: (mit-scheme-ffi).
+* FFI: (mit-scheme-pucked/ffi).
Foreign Function Interface
@end direntry
@titlepage
-@title The FFI Reference Manual
+@title MIT/GNU Scheme Pucked FFI Manual
@subtitle a Foreign Function Interface (version @value{VERSION})
-@subtitle for MIT/GNU Scheme version 9.0.1
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
@subtitle @value{UPDATED}
@author by Matt Birkholz
@page
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top FFI
+@top MIT/GNU Scheme Pucked FFI Manual
@insertcopying
@end ifnottex
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
-<head><title>MIT/GNU Scheme Pucked Documentation</title></head>
-
+<head>
+ <title>MIT/GNU Scheme Pucked Documentation</title>
+</head>
<body>
<h1 align="center">MIT/GNU Scheme Pucked Documentation</h1>
-
<hr />
+<!-- Please keep the Info version, mit-scheme-pucked.info, up-to-date
+ with this file. -->
+
+<p>
+ The following MIT/GNU Scheme Pucked manuals are available. New
+ users may want to begin
+ with <a href="mit-scheme-pucked-user/Running-Scheme.html"> Running
+ Scheme</a> in the user manual. Experienced users may want to check
+ out the <a href="mit-scheme-pucked-user/Changes.html"> Changes</a>.
+</p>
-The following MIT/GNU Scheme Pucked manuals are available.
+<h2> Core Manuals</h2>
<ul>
-<li><a href="mit-scheme-pucked-user/index.html">User Manual</a></li>
-<li><a href="mit-scheme-ref/index.html">Reference Manual</a></li>
-<li><a href="mit-scheme-sos/index.html">Scheme Object System</a></li>
-<li><a href="mit-scheme-ffi/index.html">Foreign Function Interface</a></li>
+<li><a href="user/index.html">User Manual</a></li>
+<li><a href="reference/index.html">Reference Manual</a></li>
+<li><a href="sos/index.html">Scheme Object System</a></li>
+<li><a href="ffi/index.html">Foreign Function Interface</a></li>
</ul>
-The following plugin manuals are also available.
+<h2> Plugin Manuals</h2>
<ul id="plugins">
<!-- DO NOT EDIT this list. Any edits will be clobbered. -->
Programming Languages
-* MIT/GNU Scheme FFI: (mit-scheme-ffi).
- Foreign Function Interface
-* MIT/GNU Scheme Reference: (mit-scheme-ref).
- Reference Manual
-* MIT/GNU Scheme SOS: (mit-scheme-sos).
- Scheme Object System
-* MIT/GNU Scheme User: (mit-scheme-user).
- User's Manual
+* MIT/GNU Scheme Pucked: (mit-scheme-pucked).
+ Friar Puck's MIT/GNU Scheme
sharedstatedir = @sharedstatedir@
localstatedir = @localstatedir@
libdir = @libdir@
-infodir = @infodir@
+docdir = @docdir@
mandir = @mandir@
includedir = @includedir@
oldincludedir = /usr/include
+PROJECT = @PROJECT@
+
DESTDIR =
top_builddir = .
install: install-info-gz $(INST_TARGETS)
install-info: $(INFO_TARGET)
- -rm -f $(DESTDIR)$(infodir)/$(INFO_TARGET)*
- $(INSTALL_DATA) $(INFO_TARGET)* $(DESTDIR)$(infodir)/.
- $(INSTALL_INFO_PROG) --info-dir $(DESTDIR)$(infodir)/ $(INFO_TARGET)
+ $(mkinstalldirs) $(DESTDIR)$(docdir)/info
+ -rm -f $(DESTDIR)$(docdir)/info/$(INFO_TARGET)*
+ $(INSTALL_DATA) $(INFO_TARGET)* $(DESTDIR)$(docdir)/info/.
install-info-gz: install-info
- gzip -v $(DESTDIR)$(infodir)/$(INFO_TARGET)*
+ gzip -v $(DESTDIR)$(docdir)/info/$(INFO_TARGET)*
install-html: $(HTML_TARGET)/index.html
-rm -rf $(DESTDIR)$(htmldir)/$(HTML_TARGET)
program is properly installed at your site, the command
.IP
.B info
-"MIT/GNU Scheme Pucked User"
+"MIT/GNU Scheme Pucked"
.PP
-should give you access to the complete user's manual. Programming
-information is located in the Info topics "MIT/GNU Scheme Ref" and
-"SOS". Usage of the
-.B IMAIL
-mail reader is located in the "IMAIL" topic.
+should give you access to the complete documentation.
--- /dev/null
+This is mit-scheme-pucked.info, produced by the pucked mit-scheme. It
+contains a list of all documentation for MIT/GNU Scheme Pucked and its
+installed plugins.
+
+INFO-DIR-SECTION Programming Languages
+START-INFO-DIR-ENTRY
+* MIT/GNU Scheme Pucked: (mit-scheme-pucked).
+ Friar Puck's MIT/GNU Scheme
+END-INFO-DIR-ENTRY
+
+\1f
+File: mit-scheme-pucked.info, Node: Top, Next: (dir), Prev: (dir), Up: (dir)
+
+MIT/GNU Scheme Pucked Documentation
+***********************************
+
+The following MIT/GNU Scheme Pucked manuals are available. New users
+may want to begin with the chapter Running Scheme in the user manual
+(*note (@SCMDOCDIR@/info/user)Running Scheme::).
+
+Experienced users may want to check out the Changes chapter
+(*note (@SCMDOCDIR@/info/user)Changes::).
+
+* Menu:
+
+Core Manuals
+
+* User: (@SCMDOCDIR@/info/user).
+ User Manual
+* Reference: (@SCMDOCDIR@/info/reference).
+ Reference Manual
+* SOS: (@SCMDOCDIR@/info/sos).
+ Scheme Object System
+* FFI: (@SCMDOCDIR@/info/ffi).
+ Foreign Function Interface
+
+Plugin Manuals
+
+None currently installed.
top_srcdir = @top_srcdir@
VPATH = @srcdir@
-TARGET_ROOT = mit-scheme-ref
+TARGET_ROOT = reference
TEXINFO_ROOT = scheme
SOURCES = \
$(TEXINFO_ROOT).texinfo \
\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-ref
+@setfilename reference
+@comment From automake's version.texi someday:
@set EDITION 1.106
-@set VERSION 9.2.50
-@set UPDATED 2017-02-15
-@settitle MIT/GNU Scheme @value{VERSION}
+@set UPDATED 15 February 2017
+@set SCMVERS 9.2.7
+@settitle MIT/GNU Scheme Pucked Reference Manual
@comment %**end of header
@setchapternewpage odd
@finalout
@syncodeindex tp fn
@copying
-This manual documents MIT/GNU Scheme @value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked @value{SCMVERS}.
Copyright @copyright{} 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993,
1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@end quotation
@end copying
+@dircategory Programming Languages
+@direntry
+* Reference: (mit-scheme-pucked/reference).
+ Reference Manual
+@end direntry
+
@comment Parts of this document are essentially plagiarized from "Common
@comment Lisp: The Language". Those parts are marked by the following
@comment comment lines:
@comment **** begin CLTL ****
@comment **** end CLTL ****
-@dircategory Programming Languages
-@direntry
-* MIT/GNU Scheme Reference: (mit-scheme-ref).
- Reference Manual
-@end direntry
-
@titlepage
-@title MIT/GNU Scheme Reference Manual
-@subtitle Edition @value{EDITION} for release @value{VERSION}
+@title MIT/GNU Scheme Pucked Reference Manual
+@subtitle Edition @value{EDITION}
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
@subtitle @value{UPDATED}
@author by Chris Hanson
@author the MIT Scheme Team
@ifnottex
@node Top, Acknowledgements, (dir), (dir)
-@top MIT/GNU Scheme
+@top MIT/GNU Scheme Pucked Reference Manual
@insertcopying
@end ifnottex
top_srcdir = @top_srcdir@
VPATH = @srcdir@
-TARGET_ROOT = mit-scheme-sos
+TARGET_ROOT = sos
TEXINFO_ROOT = sos
SOURCES = $(TEXINFO_ROOT).texinfo
-\input texinfo @c -*-Texinfo-*-
+\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-sos
-@set EDITION 2.13
+@setfilename sos
+@comment From automake's version.texi someday:
@set VERSION 1.9
-@set UPDATED 2011-10-14
-@settitle SOS @value{VERSION}
+@set UPDATED 14 October 2011
+@set SCMVERS 9.2.7
+@settitle MIT/GNU Scheme Pucked SOS Manual
@comment %**end of header
-@setchapternewpage on
+@setchapternewpage odd
@finalout
@syncodeindex ky fn
@syncodeindex tp fn
@copying
-This manual documents @acronym{SOS} @value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked @acronym{SOS} @value{VERSION}.
Copyright @copyright{} 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993,
1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme SOS: (mit-scheme-sos).
+* SOS: (mit-scheme-pucked/sos).
Scheme Object System
@end direntry
@titlepage
-@title The SOS Reference Manual
-@subtitle Edition @value{EDITION} for SOS @value{VERSION}
+@title MIT/GNU Scheme Pucked SOS Manual
+@subtitle a Scheme Object System (version @value{VERSION})
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
@subtitle @value{UPDATED}
@author by Chris Hanson
@page
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top SOS
+@top MIT/GNU Scheme Pucked SOS Manual
@insertcopying
@end ifnottex
top_srcdir = @top_srcdir@
VPATH = @srcdir@
-TARGET_ROOT = mit-scheme-pucked-user
+TARGET_ROOT = user
TEXINFO_ROOT = user
SOURCES = $(TEXINFO_ROOT).texinfo
\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-pucked-user
+@setfilename user
@comment From automake's version.texi someday:
-@set UPDATED 12 March 2017
@set EDITION 1.0
-@comment Override VERSION with Scheme version.
-@set VERSION 9.2.7
-@settitle MIT/GNU Scheme Pucked @value{VERSION} User Manual
+@set UPDATED 21 March 2017
+@set SCMVERS 9.2.7
+@settitle MIT/GNU Scheme Pucked User Manual
@comment %**end of header
@setchapternewpage odd
@finalout
@syncodeindex tp cp
@copying
-This manual documents the use of MIT/GNU Scheme Pucked @value{VERSION}.
+This manual documents the use of MIT/GNU Scheme Pucked @value{SCMVERS}.
Copyright @copyright{} 2016, 2017 Matthew Birkholz
@end quotation
@end copying
-@dircategory MIT/GNU Scheme Pucked
+@dircategory Programming Languages
@direntry
-* User Manual: (mit-scheme-pucked-user).
+* User: (mit-scheme-pucked/user).
+ User Manual
@end direntry
@titlepage
@title MIT/GNU Scheme Pucked User Manual
-@subtitle Edition @value{EDITION} for MIT/GNU Scheme Pucked @value{VERSION}
+@subtitle Edition @value{EDITION}
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
@subtitle @value{UPDATED}
-@author by Stephen Adams
+@author by Matt Birkholz
+@author Stephen Adams
@author Chris Hanson
-@author Matt Birkholz
@author and the MIT Scheme Team
@page
@vskip 0pt plus 1filll
@unnumbered Introduction
This document describes how to install and use MIT/GNU Scheme Pucked,
-and experimental version of MIT/GNU Scheme, the
+an experimental version of MIT/GNU Scheme, the
UnCommon Lisp. It gives installation instructions for all of the
supported platforms; complete documentation of the command-line
options and environment variables that control how Scheme works; and
install-auxdir-top:
$(mkinstalldirs) $(DESTDIR)$(AUXDIR)
$(INSTALL_DATA) $(top_srcdir)/etc/optiondb.scm $(DESTDIR)$(AUXDIR)/.
+ $(INSTALL_DATA) $(top_srcdir)/etc/plugins.scm $(DESTDIR)$(AUXDIR)/.
$(INSTALL_DATA) lib/*.com $(DESTDIR)$(AUXDIR)/.
.PHONY: default-target all all-native all-liarc macosx-app
-
AC_ARG_WITH([db-4],
AS_HELP_STRING([--with-db-4],
[Use Berkeley DB v4 library if available [[yes]]]))
LIBS=${save_LIBS}
])
fi
+
+MIT_SCHEME_PROJECT=mit-scheme-pucked
+
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)blowfish
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = blowfish-shim.la
scmlib_DATA = blowfish-types.bin blowfish-const.bin
scmlib_sub_DATA = $(sources) $(binaries)
scmlib_sub_DATA += make.scm @MIT_SCHEME_PKD@
-#info_TEXINFOS = mit-scheme-blowfish.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = blowfish.info
+#info_TEXINFOS = blowfish.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = @MIT_CFLAGS@
EXTRA_DIST += make.scm optiondb.scm tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "blowfish" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "blowfish" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "blowfish" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
-# [ -d "$(DESTDIR)$(htmldir)" ] \
-# && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode )
fi
fi
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_DEPS="${MIT_SCHEME_DEPS}
${MIT_SCHEME_PKD}: stamp-scheme"
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_CFLAGS])
AC_SUBST([MIT_SCHEME_LIBDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|blowfish|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)cairo
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = cairo-shim.la
scmlib_DATA = cairo-types.bin cairo-const.bin
scmlib_sub_DATA += $(binaries)
scmlib_sub_DATA += make.scm cairo-@MIT_SCHEME_OS_SUFFIX@.pkd
-info_TEXINFOS = mit-scheme-pucked-cairo.texi
+scminfo_DATA = cairo.info
+info_TEXINFOS = cairo.texi
AM_MAKEINFOHTMLFLAGS = --no-split
-
-# The shared system documentation directory...
-docdir = $(datarootdir)/doc/mit-scheme-pucked
-# ...with separate html and pdf subdirectories.
-htmldir = $(datarootdir)/doc/mit-scheme-pucked/html
-pdfdir = $(datarootdir)/doc/mit-scheme-pucked/pdf
-# ...and dvi and ps subdirectories?
-dvidir = $(datarootdir)/doc/mit-scheme-pucked/dvi
-psdir = $(datarootdir)/doc/mit-scheme-pucked/ps
+AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = `pkg-config --cflags pangocairo`
EXTRA_DIST += make.scm optiondb.scm check-doc.sh tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "cairo" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
install-html: install-html-am
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "cairo" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
+
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -d "$(DESTDIR)$(scmlib_subdir)" ]; then \
- rmdir "$(DESTDIR)$(scmlib_subdir)"; fi
+ ( echo '(remove-plugin "cairo" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+ [ -d "$(DESTDIR)$(scmlib_subdir)" ] \
+ && rmdir "$(DESTDIR)$(scmlib_subdir)"
-\input texinfo @c -*-Texinfo-*-
+\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-pucked-cairo.info
+@setfilename cairo.info
@include version.texi
-@settitle Cairo Plugin @value{VERSION}
+@set SCMVERS 9.2.7
+@settitle Cairo Plugin Manual
@comment %**end of header
@ifhtml
@end ifnothtml
@copying
-This manual documents a Cairo plugin for MIT/GNU Scheme Pucked, version
-@value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked Cairo @value{VERSION}.
Copyright @copyright{} 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
2015, 2016, 2017 Matthew Birkholz
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme Pucked Cairo: (mit-scheme-pucked-cairo).
+* Cairo: (mit-scheme-pucked/cairo).
Cairo 2D vector graphics plugin.
@end direntry
@titlepage
-@title Cairo User's Manual
+@title Cairo Plugin Manual
+@subtitle a Cairo 2D vector graphics plugin (version @value{VERSION})
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
+@subtitle @value{UPDATED}
@author by Matt Birkholz
@page
@vskip 0pt plus 1filll
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top Cairo Plugin
+@top Cairo Plugin Manual
@insertcopying
@end ifnottex
${MIT_SCHEME_EXE} --batch-mode <<\EOF
(let ((pkgset "cairo")
- (texi "mit-scheme-pucked-cairo.texi")
+ (texi "cairo.texi")
(pkg '()))
;; Check that every binding exported to () or PKG has a
;; corresponding @deffn in TEXI.
AC_MSG_ERROR([Cairo not found.])
fi
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_INCLUDEDIR])
Document: mit-scheme-pucked-cairo
-Title: Cairo User's Manual
+Title: MIT/GNU Scheme Pucked Cairo Manual
Author: Matt Birkholz
Abstract: The Cairo plugin for MIT/GNU Scheme Pucked wraps the Cairo
2D graphics library. This manual describes how much of the C API is
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-cairo.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-cairo.html
+Index: /usr/share/doc/mit-scheme-pucked/html/cairo.html
+Files: /usr/share/doc/mit-scheme-pucked/html/cairo.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-pucked-cairo.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/cairo.pdf.gz
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
override_dh_auto_install: debian/postinst debian/prerm
dh_auto_install -- install-html install-pdf
debian/%: debian/%.in
- sed 's|@HTMLDIR@|/usr/share/doc/mit-scheme-pucked/html|g' < $< > $@
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|cairo|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)edwin
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
sources =@MIT_SCHEME_SOURCES@
binaries =@MIT_SCHEME_BINARIES@
scmlib_sub_DATA += make.scm edwin-@MIT_SCHEME_OS_SUFFIX@.pkd
scmlib_sub_DATA += TUTORIAL
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = edwin.info
+#info_TEXINFOS = edwin.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
include $(srcdir)/source-dependencies.am
edwin.bld: stamp-scheme
EXTRA_DIST += edwin.sf edwin.cbf edwin.pkg debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "edwin" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "edwin" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
+
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "edwin" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
AC_PROG_INSTALL
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_SOURCES=`./sources.sh scm`
MIT_SCHEME_BINARIES=`./sources.sh com`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_SOURCES])
AC_SUBST([MIT_SCHEME_BINARIES])
AC_SUBST([MIT_SCHEME_EXE])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|edwin|g' < $< > $@
--- /dev/null
+()
\ No newline at end of file
;;;; Build Utilities
;;; package: (ffi build)
-(define (write-file name writer)
- (let ((tmp (pathname-new-type name "tmp")))
- (call-with-exclusive-output-file tmp writer)
- (rename-file tmp name)))
-
-(define (rewrite-file name rewriter)
- (write-file
- name
- (lambda (out)
- (call-with-input-file name
- (lambda (in)
- (rewriter in out))))))
-\f
-(define (update-optiondb directory)
- (rewrite-file
- (merge-pathnames "optiondb.scm" directory)
- (lambda (in out)
- (do ((line (read-line in) (read-line in)))
- ((or (eof-object? line)
- (string-prefix? "(further-load-options" line))
- (if (not (eof-object? line))
- (begin
- (write-string line out)
- (newline out))))
- (write-string line out)
- (newline out))
- (write-string
- (string-append ";;; DO NOT EDIT the remainder of this file."
- " Any edits will be clobbered."
- "\n") out)
- (for-each
- (lambda (name)
- (write-string "\n(define-load-option '" out)
- (write-string name out)
- (write-string "\n (standard-system-loader \"" out)
- (write-string name out)
- (write-string "\"))\n" out))
- ;; plugin-names
- (sort
- (let loop ((files (directory-read directory))
- (names '()))
- (if (pair? files)
- (loop (cdr files)
- (if (and (file-directory? (car files))
- ;; The only core subsystem with a make.scm:
- (not (string=? "ffi" (pathname-name (car files))))
- (file-exists?
- (merge-pathnames "make.scm"
- (pathname-as-directory
- (car files)))))
- (cons (pathname-name (car files)) names)
- names))
- names))
- string<?)))))
-
-(define (update-html-index directory)
- (rewrite-file
- (merge-pathnames "index.html" directory)
- (lambda (in out)
- (do ((line (read-line in) (read-line in)))
- ((or (eof-object? line)
- (string-prefix? "<ul id=\"plugins\"" line))
- (if (not (eof-object? line))
- (begin
- (write-string line out)
- (newline out))))
- (write-string line out)
- (newline out))
- (write-string (string-append "<!-- DO NOT EDIT this list."
- " Any edits will be clobbered. -->\n") out)
- (for-each
- (lambda (name.title)
- (write-string "<li><a href=\"" out)
- (write-string (car name.title) out)
- (write-string ".html\">" out)
- (write-string (cdr name.title) out)
- (write-string "</a></li>\n" out))
- (sort
- (let loop ((files (directory-read directory))
- (names.titles '()))
- (if (pair? files)
- (loop (cdr files)
- (if (and (pathname-type (car files))
- (string=? "html" (pathname-type (car files)))
- (string-prefix? "mit-scheme-"
- (pathname-name (car files))))
- (let ((name (pathname-name (car files)))
- (title (read-html-title (car files))))
- (cons (cons name title) names.titles))
- names.titles))
- (if (pair? names.titles)
- names.titles
- (begin
- (write-string "<i>None currently installed.</i>\n" out)
- '()))))
- (lambda (a b) (string<? (car a) (car b)))))
- ;; Skip old list.
- (do ((line (read-line in) (read-line in)))
- ((or (eof-object? line)
- (string-prefix? "</ul>" line))
- (if (eof-object? line)
- (error "Premature end of HTML index.")
- (begin
- (write-string line out)
- (newline out)))))
- ;; Copy the rest.
- (do ((line (read-line in) (read-line in)))
- ((eof-object? line))
- (write-string line out)
- (newline out)))))
+(define (add-plugin name project infodir scmlibdir scmdocdir)
+ (update-plugin 'add name project infodir scmlibdir scmdocdir))
+
+(define (remove-plugin name project infodir scmlibdir scmdocdir)
+ (update-plugin 'remove name project infodir scmlibdir scmdocdir))
+
+(define (update-plugin operation name project infodir scmlibdir scmdocdir)
+ (let ((scmlibdir (pathname-as-directory scmlibdir))
+ (infodir (and (not (string-null? infodir))
+ (pathname-as-directory infodir)))
+ (scmdocdir (and (not (string-null? scmdocdir))
+ (pathname-as-directory scmdocdir))))
+ (let ((plugins (updated-plugin-list operation name scmlibdir)))
+ (update-optiondb plugins scmlibdir)
+ (update-info-index project plugins infodir scmdocdir)
+ (update-html-index plugins scmdocdir))))
+
+(define (updated-plugin-list operation plugin scmlibdir)
+ (let ((pathname (merge-pathnames "plugins.scm" scmlibdir)))
+ (if (file-exists? pathname) ;i.e. NOT in dpkg-buildpackage chroot
+ (rewrite-file
+ pathname
+ (lambda (in out)
+ (cond ((eq? operation 'add)
+ (let ((new (cons plugin (delete! plugin (read in)))))
+ (write new out)
+ new))
+ ((eq? operation 'remove)
+ (let ((new (delete! plugin (read in))))
+ (write new out)
+ new))
+ (else
+ (error "Unexpected plugin-list operation:" operation)))))
+ (begin
+ (warn "plugin list not found:" pathname)
+ '()))))
+
+(define (update-optiondb plugins scmlibdir)
+ (let ((pathname (merge-pathnames "optiondb.scm" scmlibdir)))
+ (if (file-exists? pathname) ;i.e. NOT in dpkg-buildpackage chroot
+ (rewrite-file
+ pathname
+ (lambda (in out)
+ (copy-to+line "(further-load-options" in out)
+ (write-string (string ";;; DO NOT EDIT the remainder of this file."
+ " Any edits will be clobbered."
+ "\n") out)
+ (for-each
+ (lambda (name)
+ (write-string "\n(define-load-option '" out)
+ (write-string name out)
+ (write-string "\n (standard-system-loader \"" out)
+ (write-string name out)
+ (write-string "\"))\n" out))
+ (sort plugins string<?))))
+ (warn "optiondb not found:" pathname))))
+
+(define (update-info-index project plugins infodir scmdocdir)
+ (let ((pathname (and infodir
+ (merge-pathnames (string project".info") infodir))))
+ (if (and pathname
+ (file-exists-or-compressed? pathname))
+ (rewrite-file
+ pathname
+ (lambda (in out)
+ (copy-to+line "Plugin Manuals" in out)
+ (newline out)
+ (for-each (lambda (plugin)
+ (write-direntry project plugin scmdocdir out))
+ (sort plugins string<?))))
+ (if pathname
+ (warn "Scheme Info index not found:" pathname)))))
+
+(define (write-direntry project plugin scmdocdir out)
+ (load-option-quietly 'regular-expression)
+ (let* ((scmdocdirstr/ (->namestring scmdocdir))
+ (filename (string scmdocdirstr/"info/"plugin".info")))
+ (if (file-exists-or-compressed? filename)
+ (call-with-input-file-uncompressed
+ filename
+ (lambda (in)
+ (skip-to-line "START-INFO-DIR-ENTRY" in)
+ (transform-to-line
+ "END-INFO-DIR-ENTRY" in out #f
+ (let ((project-dir-patt (string "("project"/")))
+ (lambda (line)
+ (let ((regs (re-string-search-forward project-dir-patt line)))
+ (if regs
+ (string (substring line 0 (re-match-start-index 0 regs))
+ "("scmdocdirstr/"info/"
+ (substring line (re-match-end-index 0 regs)))
+ line))))))))))
+
+(define (update-html-index plugins scmdocdir)
+ (let* ((scmhtmldir (merge-pathnames "html/" scmdocdir))
+ (pathname (merge-pathnames "index.html" scmhtmldir)))
+ (if (file-exists? pathname)
+ (rewrite-file
+ pathname
+ (lambda (in out)
+ (copy-to+line "<ul id=\"plugins\"" in out)
+ (newline out)
+ (write-string (string-append "<!-- DO NOT EDIT this list."
+ " Any edits will be clobbered. -->"
+ "\n") out)
+
+ ;; Write new list.
+ (let ((names.titles (html-names.titles plugins scmhtmldir)))
+ (for-each
+ (lambda (name.title)
+ (write-string "<li><a href=\"" out)
+ (write-string (car name.title) out)
+ (write-string ".html\">" out)
+ (write-string (cdr name.title) out)
+ (write-string "</a></li>\n" out))
+ names.titles)
+ (if (null? names.titles)
+ (write-string "<i>None currently installed.</i>\n" out)))
+
+ ;; Skip old list.
+ (do ((line (read-line in) (read-line in)))
+ ((or (eof-object? line)
+ (string-prefix? "</ul>" line))
+ (if (eof-object? line)
+ (error "Premature end of HTML index.")
+ (begin
+ (write-string line out)
+ (newline out)))))
+
+ ;; Copy the rest.
+ (do ((line (read-line in) (read-line in)))
+ ((eof-object? line))
+ (write-string line out)
+ (newline out))))
+ (warn "Scheme html index not found:" pathname))))
+
+(define (html-names.titles plugins scmhtmldir)
+ (let ((base (pathname-new-type (merge-pathnames scmhtmldir) "html")))
+ (append-map!
+ (lambda (plugin)
+ (let ((pathname (merge-pathnames plugin base)))
+ (if (file-exists? pathname)
+ (list (cons plugin (read-html-title pathname)))
+ '())))
+ plugins)))
(define (read-html-title pathname)
+ (load-option-quietly 'regular-expression)
(call-with-input-file pathname
(lambda (in)
(let loop ()
(let ((regs (re-string-match "<title>\\(.*\\)</title>" line)))
(if (not regs)
(loop)
- (re-match-extract line regs 1)))))))))
\ No newline at end of file
+ (re-match-extract line regs 1)))))))))
+
+(define (copy-to+line prefix in out)
+ (transform-to-line prefix in out #t #f))
+
+(define (copy-to-line prefix in out)
+ (transform-to-line prefix in out #f #f))
+
+(define (transform-to-line prefix in out inclusive? transform)
+ (do ((line (read-line in) (read-line in)))
+ ((or (eof-object? line)
+ (string-prefix? prefix line))
+ (if (eof-object? line)
+ (error "Copied to eof without seeing line:" prefix))
+ (if inclusive?
+ (let ((line* (if transform (transform line) line)))
+ (write-string line* out)
+ (newline out))))
+ (write-string (if transform (transform line) line) out)
+ (newline out)))
+
+(define (skip-to-line prefix in)
+ (do ((line (read-line in) (read-line in)))
+ ((or (eof-object? line)
+ (string-prefix? prefix line))
+ (if (eof-object? line)
+ (error "Skipped to eof without seeing line:" prefix)))))
+
+(define (rewrite-file filename rewriter)
+ (let ((suffix.progs (compressed? filename)))
+ (if suffix.progs
+ (rewrite-compressed-file filename suffix.progs rewriter)
+ (rewrite-simple-file filename rewriter))))
+
+(define (rewrite-simple-file filename rewriter)
+ (let ((replacement (replacement-filename filename)))
+ (if (file-exists? replacement)
+ (delete-file replacement))
+ (with-temporary-file
+ replacement
+ (lambda ()
+ (let ((value (call-with-exclusive-output-file
+ replacement
+ (lambda (out)
+ (call-with-input-file filename
+ (lambda (in)
+ (rewriter in out)))))))
+ (rename-file replacement filename)
+ value)))))
+
+(define (rewrite-compressed-file filename suffix.progs rewriter)
+ (load-option-quietly 'synchronous-subprocess)
+ (let ((compressed (string filename"."(car suffix.progs))))
+ (call-with-temporary-file-pathname
+ (lambda (uncompressed)
+ (un/compress-file (cddr suffix.progs) compressed uncompressed)
+ (call-with-temporary-file-pathname
+ (lambda (transformed)
+ (let ((value
+ (call-with-input-file uncompressed
+ (lambda (in)
+ (call-with-output-file transformed
+ (lambda (out)
+ (rewriter in out)))))))
+ (let ((replacement (replacement-filename filename)))
+ (if (file-exists? replacement)
+ (delete-file replacement))
+ (with-temporary-file
+ replacement
+ (lambda ()
+ (un/compress-file (cadr suffix.progs) transformed replacement)
+ (rename-file replacement compressed))))
+ value)))))))
+
+(define (call-with-input-file-uncompressed filename receiver)
+ (let ((suffix.progs (compressed? filename)))
+ (if suffix.progs
+ (let ((compressed (string filename"."(car suffix.progs))))
+ (call-with-temporary-file-pathname
+ (lambda (uncompressed)
+ (un/compress-file (cddr suffix.progs) compressed uncompressed)
+ (call-with-input-file uncompressed receiver))))
+ (call-with-input-file filename receiver))))
+
+(define compressed-file-suffixes.progs
+ '(("gz" "gzip" . "gunzip")
+ ("bz2" "bzip2" . "bunzip2")
+ ("Z" "compress" . "uncompress")))
+
+(define (file-exists-or-compressed? pathname)
+ (or (file-exists? pathname)
+ (let ((filename (->namestring pathname)))
+ (find (lambda (suffix.progs)
+ (file-exists? (string filename"."(car suffix.progs))))
+ compressed-file-suffixes.progs))))
+
+(define (compressed? filename)
+ (and (not (file-exists? filename))
+ (find (lambda (suffix.progs)
+ (file-exists? (string filename"."(car suffix.progs))))
+ compressed-file-suffixes.progs)))
+
+(define (un/compress-file program infile outfile)
+ (let ((cmdline (string program" < '"infile"' > '"outfile"'")))
+ (if (not (zero? (run-shell-command cmdline)))
+ (error "File un/compress failed:" cmdline))))
+
+(define (replacement-filename filename)
+ (let ((pathname (->pathname filename)))
+ (string (directory-namestring pathname)
+ "."(file-namestring pathname)"."(random-alphanumeric-string 6))))
+
+(define (random-alphanumeric-string length)
+ (list->string (map (lambda (i) i (random-alphanumeric-character))
+ (iota length))))
+
+(define (random-alphanumeric-character)
+ (integer->char
+ (let ((n (random 62)))
+ (cond ((< n 26) (+ (char->integer #\a) n))
+ ((< n 52) (+ (char->integer #\A) (- n 26)))
+ (else (+ (char->integer #\0) (- n 52)))))))
+
+(define (load-option-quietly name)
+ (if (not (option-loaded? name))
+ (let ((kernel
+ (lambda ()
+ (parameterize* (list (cons param:suppress-loading-message? #t))
+ (lambda ()
+ (load-option name))))))
+ (if (nearest-cmdl/batch-mode?)
+ (kernel)
+ (with-notification
+ (lambda (port)
+ (write-string "Loading " port)
+ (write-string (symbol->string name) port)
+ (write-string " option" port))
+ kernel)))))
\ No newline at end of file
(parent ())
(files "build")
(export (ffi)
- update-optiondb
- update-html-index))
\ No newline at end of file
+ add-plugin
+ remove-plugin))
\ No newline at end of file
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)gdbm
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = gdbm-shim.la
scmlib_DATA = gdbm-types.bin gdbm-const.bin
scmlib_sub_DATA = $(sources) $(binaries)
scmlib_sub_DATA += make.scm @MIT_SCHEME_PKD@
-#info_TEXINFOS = mit-scheme-gdbm.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = gdbm.info
+#info_TEXINFOS = gdbm.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = @MIT_CFLAGS@
EXTRA_DIST += make.scm optiondb.scm tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "gdbm" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "gdbm" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "gdbm" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
-# [ -d "$(DESTDIR)$(htmldir)" ] \
-# && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode )
LIBS="-lgdbm"
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_DEPS="${MIT_SCHEME_DEPS}
${MIT_SCHEME_PKD}: stamp-scheme"
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_CFLAGS])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|gdbm|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)gl
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = gl-shim.la
scmlib_DATA = gl-types.bin gl-const.bin
scmlib_sub_DATA += $(binaries)
scmlib_sub_DATA += make.scm gl-@MIT_SCHEME_OS_SUFFIX@.pkd
-#info_TEXINFOS = mit-scheme-pucked-gl.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# The shared system documentation directory...
-docdir = $(datarootdir)/doc/mit-scheme-pucked
-# ...with separate html and pdf subdirectories.
-htmldir = $(datarootdir)/doc/mit-scheme-pucked/html
-pdfdir = $(datarootdir)/doc/mit-scheme-pucked/pdf
-# ...and dvi and ps subdirectories?
-dvidir = $(datarootdir)/doc/mit-scheme-pucked/dvi
-psdir = $(datarootdir)/doc/mit-scheme-pucked/ps
+#scminfo_DATA = gl.info
+#info_TEXINFOS = gl.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = `pkg-config --cflags gl glu gtk+-3.0`
EXTRA_DIST += make.scm optiondb.scm tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "gl" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "gl" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode; fi
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -d "$(DESTDIR)$(scmlib_subdir)" ]; then \
- rmdir "$(DESTDIR)$(scmlib_subdir)"; fi
+ ( echo '(remove-plugin "gl" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+ [ -d "$(DESTDIR)$(scmlib_subdir)" ] \
+ && rmdir "$(DESTDIR)$(scmlib_subdir)"
AC_MSG_ERROR([libGL not found.])
fi
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_INCLUDEDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|gl|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)glib
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = glib-shim.la
scmlib_DATA = glib-types.bin glib-const.bin
scmlib_sub_DATA += $(binaries)
scmlib_sub_DATA += make.scm glib-@MIT_SCHEME_OS_SUFFIX@.pkd
-info_TEXINFOS = mit-scheme-pucked-glib.texi
+scminfo_DATA = glib.info
+info_TEXINFOS = glib.texi
AM_MAKEINFOHTMLFLAGS = --no-split
-
-# The shared system documentation directory...
-docdir = $(datarootdir)/doc/mit-scheme-pucked
-# ...with separate html and pdf subdirectories.
-htmldir = $(datarootdir)/doc/mit-scheme-pucked/html
-pdfdir = $(datarootdir)/doc/mit-scheme-pucked/pdf
-# ...and dvi and ps subdirectories?
-dvidir = $(datarootdir)/doc/mit-scheme-pucked/dvi
-psdir = $(datarootdir)/doc/mit-scheme-pucked/ps
+AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = `pkg-config --cflags gio-2.0`
EXTRA_DIST += make.scm optiondb.scm check-doc.sh tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "glib" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
install-html: install-html-am
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "glib" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
+
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo ' (update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -d "$(DESTDIR)$(scmlib_subdir)" ]; then \
- rmdir "$(DESTDIR)$(scmlib_subdir)"; fi
+ ( echo '(remove-plugin "glib" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+ [ -d "$(DESTDIR)$(scmlib_subdir)" ] \
+ && rmdir "$(DESTDIR)$(scmlib_subdir)"
${MIT_SCHEME_EXE} --batch-mode <<\EOF
(let ((pkgset "glib")
- (texi "mit-scheme-pucked-glib.texi")
+ (texi "glib.texi")
(pkg '(glib)))
;; Check that every binding exported to () or PKG has a
;; corresponding @deffn in TEXI.
AC_MSG_ERROR([GLib 2.0 not found.])
fi
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_INCLUDEDIR])
Document: mit-scheme-pucked-glib
-Title: GLib User's Manual
+Title: MIT/GNU Scheme Pucked GLib Manual
Author: Matt Birkholz
Abstract: The GLib plugin for MIT/GNU Scheme Pucked runs Scheme in a
GSource of the GMainLoop. It implements asynchronous IO via the GIO
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-glib.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-glib.html
+Index: /usr/share/doc/mit-scheme-pucked/html/glib.html
+Files: /usr/share/doc/mit-scheme-pucked/html/glib.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-pucked-glib.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/glib.pdf.gz
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
override_dh_auto_install: debian/postinst debian/prerm
dh_auto_install -- install-html install-pdf
debian/%: debian/%.in
- sed 's|@HTMLDIR@|/usr/share/doc/mit-scheme-pucked/html|g' < $< > $@
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|glib|g' < $< > $@
(begin
(load-option 'GLIB)
(load "glib-tests")
- (let ((file1 "mit-scheme-pucked-glib.texi")
+ (let ((file1 "glib.texi")
(file2 "test-copy-1.txt"))
(gcp file1 file2)
(load-option 'MD5)
-\input texinfo @c -*-Texinfo-*-
+\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-pucked-glib.info
+@setfilename glib.info
@include version.texi
-@settitle GLib Plugin @value{VERSION}
+@set SCMVERS 9.2.7
+@settitle GLib Plugin Manual
@comment %**end of header
@ifhtml
@end ifnothtml
@copying
-This manual documents a GLib plugin for MIT/GNU Scheme Pucked, version
-@value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked GLib @value{VERSION}.
Copyright @copyright{} 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
2015, 2016, 2017 Matthew Birkholz
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme Pucked GLib: (mit-scheme-pucked-glib).
- GLib, GObject and GIO libraries plugin.
+* GLib: (mit-scheme-pucked/glib).
+ GLib, GObject and GIO plugin.
@end direntry
@titlepage
-@title GLib User's Manual
+@title GLib Plugin Manual
+@subtitle a GLib, GObject and GIO plugin (version @value{VERSION})
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
+@subtitle @value{UPDATED}
@author by Matt Birkholz
@page
@vskip 0pt plus 1filll
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top GLib Plugin
+@top GLib Plugin Manual
@insertcopying
@end ifnottex
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)gtk-screen
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
sources = gtk-screen.scm gtk-faces.scm
scmlib_sub_DATA += gtk-faces.bin gtk-faces.bci gtk-faces.com
scmlib_sub_DATA += make.scm gtk-screen-@MIT_SCHEME_OS_SUFFIX@.pkd
-#info_TEXINFOS = mit-scheme-gtk-screen.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = gtk-screen.info
+#info_TEXINFOS = gtk-screen.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
gtk-screen.bin: stamp-scheme
gtk-screen.bci: stamp-scheme
EXTRA_DIST += debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "gtk-screen" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "gtk-screen" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode; fi
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -d "$(DESTDIR)$(scmlib_subdir)" ]; then \
- rmdir "$(DESTDIR)$(scmlib_subdir)"; fi
-# if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "gtk-screen" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+ [ -d "$(DESTDIR)$(scmlib_subdir)" ] \
+ && rmdir "$(DESTDIR)$(scmlib_subdir)"
AC_PROG_INSTALL
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_OS_SUFFIX])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|gtk-screen|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)gtk
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = gtk-shim.la
scmlib_DATA = gtk-types.bin gtk-const.bin conses.png
scmlib_sub_DATA += $(binaries)
scmlib_sub_DATA += make.scm gtk-@MIT_SCHEME_OS_SUFFIX@.pkd
-info_TEXINFOS = mit-scheme-pucked-gtk.texi
+scminfo_DATA = gtk.info
+info_TEXINFOS = gtk.texi
AM_MAKEINFOHTMLFLAGS = --no-split
-
-# The shared system documentation directory...
-docdir = $(datarootdir)/doc/mit-scheme-pucked
-# ...with separate html and pdf subdirectories.
-htmldir = $(datarootdir)/doc/mit-scheme-pucked/html
-pdfdir = $(datarootdir)/doc/mit-scheme-pucked/pdf
-# ...and dvi and ps subdirectories?
-dvidir = $(datarootdir)/doc/mit-scheme-pucked/dvi
-psdir = $(datarootdir)/doc/mit-scheme-pucked/ps
+AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = `pkg-config --cflags gtk+-3.0`
EXTRA_DIST += debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "gtk" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
install-html: install-html-am
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "gtk" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
+
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -d "$(DESTDIR)$(scmlib_subdir)" ]; then \
- rmdir "$(DESTDIR)$(scmlib_subdir)"; fi
+ ( echo '(remove-plugin "gtk" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+ [ -d "$(DESTDIR)$(scmlib_subdir)" ] \
+ && rmdir "$(DESTDIR)$(scmlib_subdir)"
${MIT_SCHEME_EXE} --batch-mode <<\EOF
(let ((pkgset "gtk")
- (texi "mit-scheme-pucked-gtk.texi")
+ (texi "gtk.texi")
(pkg '(gtk)))
;; Check that every binding exported to () or PKG has a
;; corresponding @deffn in TEXI.
ln -sf gtkscrolledview-$GTK_VERSION.c gtkscrolledview.c
ln -sf gtkpanedview-$GTK_VERSION.c gtkpanedview.c
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_INCLUDEDIR])
Document: mit-scheme-pucked-gtk
-Title: Gtk User's Manual
+Title: MIT/GNU Scheme Pucked Gtk Manual
Author: Matt Birkholz
Abstract: The Gtk plugin for MIT/GNU Scheme Pucked wraps the GNOME
toolkit widget library. This manual describes how much of the C API
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-gtk.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-gtk.html
+Index: /usr/share/doc/mit-scheme-pucked/html/gtk.html
+Files: /usr/share/doc/mit-scheme-pucked/html/gtk.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-pucked-gtk.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/gtk.pdf.gz
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
override_dh_auto_install: debian/postinst debian/prerm
dh_auto_install -- install-html install-pdf
debian/%: debian/%.in
- sed 's|@HTMLDIR@|/usr/share/doc/mit-scheme-pucked/html|g' < $< > $@
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|gtk|g' < $< > $@
-\input texinfo @c -*-Texinfo-*-
+\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-pucked-gtk.info
+@setfilename gtk.info
@include version.texi
-@settitle Gtk Plugin @value{VERSION}
+@set SCMVERS 9.2.7
+@settitle Gtk Plugin Manual
@comment %**end of header
@ifhtml
@end ifnothtml
@copying
-This manual documents a Gtk plugin for MIT/GNU Scheme Pucked, version
-@value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked Gtk @value{VERSION}.
Copyright @copyright{} 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
2015, 2016, 2017 Matthew Birkholz
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme Pucked Gtk: (mit-scheme-pucked-gtk).
+* Gtk: (mit-scheme-pucked/gtk).
GNOME toolkits plugin.
@end direntry
@titlepage
-@title Gtk User's Manual
+@title Gtk Plugin Manual
+@subtitle a GNOME toolkits plugin (version @value{VERSION})
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
+@subtitle @value{UPDATED}
@author by Matt Birkholz
@page
@vskip 0pt plus 1filll
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top Gtk Plugin
+@top Gtk Plugin Manual
@insertcopying
@end ifnottex
Sets the foreground and background colors for future drawing
operations. @var{Color} should be a color name or specification
understood by the Cairo plugin. @xref{colors, , Cairo Colors,
-mit-scheme-cairo, MIT/GNU Scheme Cairo Plugin}.
+cairo, MIT/GNU Scheme Cairo Plugin}.
@end deffn
@deffn Procedure gtk-graphics/clear device
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)imail
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+scminfodir = $(scmdocdir)/info
sources = imail-browser.scm imail-core.scm imail-file.scm imail-imap.scm
sources += imail-mime.scm imail-rmail.scm imail-summary.scm imail-top.scm
scmlib_sub_DATA += $(binaries)
scmlib_sub_DATA += make.scm imail-@MIT_SCHEME_OS_SUFFIX@.pkd
-info_TEXINFOS = mit-scheme-pucked-imail.texi
+scminfo_DATA = imail.info
+info_TEXINFOS = imail.texi
AM_MAKEINFOHTMLFLAGS = --no-split
-
-# The shared system documentation directory...
-docdir = $(datarootdir)/doc/mit-scheme-pucked
-# ...with separate html and pdf subdirectories.
-htmldir = $(datarootdir)/doc/mit-scheme-pucked/html
-pdfdir = $(datarootdir)/doc/mit-scheme-pucked/pdf
-# ...and dvi and ps subdirectories?
-dvidir = $(datarootdir)/doc/mit-scheme-pucked/dvi
-psdir = $(datarootdir)/doc/mit-scheme-pucked/ps
+AM_UPDATE_INFO_DIR = no
imail-browser.bci: stamp-scheme
imail-browser.com: stamp-scheme
EXTRA_DIST += $(sources) compile.sh make.scm compile.scm imail.pkg debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "imail" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
install-html: install-html-am
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "imail" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
+
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- [ -d "$(DESTDIR)$(htmldir)" ] \
- && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode )
+ ( echo '(remove-plugin "imail" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
AC_PROG_INSTALL
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_OS_SUFFIX])
Section: Network/Communication
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-imail.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-imail.html
+Index: /usr/share/doc/mit-scheme-pucked/html/imail.html
+Files: /usr/share/doc/mit-scheme-pucked/html/imail.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-pucked-imail.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/imail.pdf.gz
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
override_dh_auto_install: debian/postinst debian/prerm
dh_auto_install -- install-html install-pdf
debian/%: debian/%.in
- sed 's|@HTMLDIR@|/usr/share/doc/mit-scheme-pucked/html|g' < $< > $@
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|imail|g' < $< > $@
\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-pucked-imail.info
+@setfilename imail.info
@include version.texi
-@settitle IMAIL @value{VERSION}
+@set SCMVERS 9.2.7
+@settitle IMAIL Plugin Manual
@comment %**end of header
@setchapternewpage on
@finalout
@syncodeindex tp cp
@copying
-This manual documents @acronym{IMAIL} @value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked @acronym{IMAIL} @value{VERSION}.
Copyright @copyright{} 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993,
1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme IMAIL: (mit-scheme-imail).
- IMAP/MIME email reader
+* IMAIL: (mit-scheme-pucked/imail).
+ IMAP/MIME email reader.
@end direntry
@titlepage
-@title IMAIL User's Manual
-@subtitle Edition @value{EDITION} for IMAIL @value{VERSION}
+@title IMAIL Plugin Manual
+@subtitle an IMAP/MIME email reader (version @value{VERSION})
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
@subtitle @value{UPDATED}
@author by Chris Hanson
@page
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top IMAIL
+@top IMAIL Plugin Manual
@insertcopying
@end ifnottex
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)mcrypt
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = mcrypt-shim.la
scmlib_DATA = mcrypt-types.bin mcrypt-const.bin
scmlib_sub_DATA = $(sources) $(binaries)
scmlib_sub_DATA += make.scm @MIT_SCHEME_PKD@
-#info_TEXINFOS = mit-scheme-mcrypt.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = mcrypt.info
+#info_TEXINFOS = mcrypt.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = @MIT_CFLAGS@
EXTRA_DIST += make.scm optiondb.scm tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "mcrypt" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "mcrypt" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "mcrypt" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
-# [ -d "$(DESTDIR)$(htmldir)" ] \
-# && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode )
CFLAGS="${MCRYPT_CFLAGS} ${CFLAGS}"
LIBS="${LIBS} ${MCRYPT_LIBS}"
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_DEPS="${MIT_SCHEME_DEPS}
${MIT_SCHEME_PKD}: stamp-scheme"
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_CFLAGS])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|mcrypt|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)md5
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = md5-shim.la
scmlib_DATA = md5-types.bin md5-const.bin
scmlib_sub_DATA = $(sources) $(binaries)
scmlib_sub_DATA += make.scm @MIT_SCHEME_PKD@
-#info_TEXINFOS = mit-scheme-md5.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = md5.info
+#info_TEXINFOS = md5.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = @MIT_CFLAGS@
EXTRA_DIST += make.scm optiondb.scm tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "md5" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "md5" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "md5" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
-# [ -d "$(DESTDIR)$(htmldir)" ] \
-# && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode )
fi
fi
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_DEPS="${MIT_SCHEME_DEPS}
${MIT_SCHEME_PKD}: stamp-scheme"
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_CFLAGS])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|md5|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)mhash
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = mhash-shim.la
scmlib_DATA = mhash-types.bin mhash-const.bin
scmlib_sub_DATA = $(sources) $(binaries)
scmlib_sub_DATA += make.scm @MIT_SCHEME_PKD@
-#info_TEXINFOS = mit-scheme-mhash.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = mhash.info
+#info_TEXINFOS = mhash.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = @MIT_CFLAGS@
EXTRA_DIST += make.scm optiondb.scm tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "mhash" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "mhash" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "mhash" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
-# [ -d "$(DESTDIR)$(htmldir)" ] \
-# && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode )
LIBS="-lmhash"
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_DEPS="${MIT_SCHEME_DEPS}
${MIT_SCHEME_PKD}: stamp-scheme"
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_CFLAGS])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|mhash|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)pango
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = pango-shim.la
scmlib_DATA = pango-types.bin pango-const.bin
scmlib_sub_DATA += $(binaries)
scmlib_sub_DATA += make.scm pango-@MIT_SCHEME_OS_SUFFIX@.pkd
-info_TEXINFOS = mit-scheme-pucked-pango.texi
+scminfo_DATA = pango.info
+info_TEXINFOS = pango.texi
AM_MAKEINFOHTMLFLAGS = --no-split
-
-# The shared system documentation directory...
-docdir = $(datarootdir)/doc/mit-scheme-pucked
-# ...with separate html and pdf subdirectories.
-htmldir = $(datarootdir)/doc/mit-scheme-pucked/html
-pdfdir = $(datarootdir)/doc/mit-scheme-pucked/pdf
-# ...and dvi and ps subdirectories?
-dvidir = $(datarootdir)/doc/mit-scheme-pucked/dvi
-psdir = $(datarootdir)/doc/mit-scheme-pucked/ps
+AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = `pkg-config --cflags pango`
EXTRA_DIST += make.scm optiondb.scm check-doc.sh tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "pango" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
install-html: install-html-am
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "pango" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
+
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -d "$(DESTDIR)$(scmlib_subdir)" ]; then \
- rmdir "$(DESTDIR)$(scmlib_subdir)"; fi
+ ( echo '(remove-plugin "pango" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+ [ -d "$(DESTDIR)$(scmlib_subdir)" ] \
+ && rmdir "$(DESTDIR)$(scmlib_subdir)"
${MIT_SCHEME_EXE} --batch-mode <<\EOF
(let ((pkgset "pango")
- (texi "mit-scheme-pucked-pango.texi")
+ (texi "pango.texi")
(pkg '()))
;; Check that every binding exported to () or PKG has a
;; corresponding @deffn in TEXI.
AC_MSG_ERROR([Pango not found.])
fi
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_INCLUDEDIR])
Document: mit-scheme-pucked-pango
-Title: Pango User's Manual
+Title: MIT/GNU Scheme Pucked Pango Manual
Author: Matt Birkholz
Abstract: The Pango plugin for MIT/GNU Scheme Pucked wraps the Pango
text layout and rendering library. This manual describes how much of
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-pango.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-pango.html
+Index: /usr/share/doc/mit-scheme-pucked/html/pango.html
+Files: /usr/share/doc/mit-scheme-pucked/html/pango.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-pucked-pango.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/pango.pdf.gz
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
override_dh_auto_install: debian/postinst debian/prerm
dh_auto_install -- install-html install-pdf
debian/%: debian/%.in
- sed 's|@HTMLDIR@|/usr/share/doc/mit-scheme-pucked/html|g' < $< > $@
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|pango|g' < $< > $@
-\input texinfo @c -*-Texinfo-*-
+\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-pucked-pango.info
+@setfilename pango.info
@include version.texi
-@settitle Pango Plugin @value{VERSION}
+@set SCMVERS 9.2.7
+@settitle Pango Plugin Manual
@comment %**end of header
@ifhtml
@end ifnothtml
@copying
-This manual documents a Pango plugin for MIT/GNU Scheme Pucked, version
-@value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked Pango @value{VERSION}.
Copyright @copyright{} 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
2015, 2016, 2017 Matthew Birkholz
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme Pucked Pango: (mit-scheme-pucked-pango).
+* Pango: (mit-scheme-pucked/pango).
Pango text layout and rendering plugin.
@end direntry
@titlepage
-@title Pango User's Manual
+@title Pango Plugin Manual
+@subtitle a text layout and rendering plugin (version @value{VERSION})
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
+@subtitle @value{UPDATED}
@author by Matt Birkholz
@page
@vskip 0pt plus 1filll
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top Pango Plugin
+@top Pango Plugin Manual
@insertcopying
@end ifnottex
])
])
fi
+
+MIT_SCHEME_PROJECT=mit-scheme-pucked
+
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)planetarium
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+scminfodir = $(scmdocdir)/info
sources = earth.scm geometry.scm google-earth.scm graphics.scm
sources += matrices.scm mit-cairo.scm mit-cil.scm mit-graphics.scm mit-gtk.scm
scmlib_sub_DATA += make.scm mit-@MIT_SCHEME_OS_SUFFIX@.pkd
scmlib_sub_DATA += mit-link.scm mit-3d-@MIT_SCHEME_OS_SUFFIX@.pkd
-info_TEXINFOS = mit-scheme-pucked-planetarium.texi
+scminfo_DATA = planetarium.info
+info_TEXINFOS = planetarium.texi
AM_MAKEINFOHTMLFLAGS = --no-split
-
-# The shared system documentation directory...
-docdir = $(datarootdir)/doc/mit-scheme-pucked
-# ...with separate html and pdf subdirectories.
-htmldir = $(datarootdir)/doc/mit-scheme-pucked/html
-pdfdir = $(datarootdir)/doc/mit-scheme-pucked/pdf
-# ...and dvi and ps subdirectories?
-dvidir = $(datarootdir)/doc/mit-scheme-pucked/dvi
-psdir = $(datarootdir)/doc/mit-scheme-pucked/ps
+AM_UPDATE_INFO_DIR = no
make.scm: mit-make.scm
cp $< $@
EXTRA_DIST += debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "planetarium" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
install-html: install-html-am
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "planetarium" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
+
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -f "$(DESTDIR)$(htmldir)/index.html" ]; then \
- echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
- if [ -d "$(DESTDIR)$(scmlib_subdir)" ]; then \
- rmdir "$(DESTDIR)$(scmlib_subdir)"; fi
+ ( echo '(remove-plugin "planetarium" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+ [ -d "$(DESTDIR)$(scmlib_subdir)" ] \
+ && rmdir "$(DESTDIR)$(scmlib_subdir)"
AC_PROG_INSTALL
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_OS_SUFFIX=`echo "(display (microcode-id/operating-system-suffix))" \
| ${MIT_SCHEME_EXE} --batch-mode`
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_OS_SUFFIX])
Document: mit-scheme-pucked-planetarium
-Title: Planetarium User's Manual
+Title: MIT/GNU Scheme Pucked Planetarium Manual
Author: Matt Birkholz
Abstract: The planetarium for MIT/GNU Scheme Pucked contains just
enough astronomy code to plot the position of the sun. It also
Section: Programming
Format: HTML
-Index: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-planetarium.html
-Files: /usr/share/doc/mit-scheme-pucked/html/mit-scheme-pucked-planetarium.html
+Index: /usr/share/doc/mit-scheme-pucked/html/planetarium.html
+Files: /usr/share/doc/mit-scheme-pucked/html/planetarium.html
Format: PDF
-Files: /usr/share/doc/mit-scheme-pucked/pdf/mit-scheme-pucked-planetarium.pdf.gz
+Files: /usr/share/doc/mit-scheme-pucked/pdf/planetarium.pdf.gz
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
-| mit-scheme-pucked --batch-mode
-echo '(update-html-index "@HTMLDIR@/")' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
override_dh_auto_install: debian/postinst debian/prerm
dh_auto_install -- install-html install-pdf
debian/%: debian/%.in
- sed 's|@HTMLDIR@|/usr/share/doc/mit-scheme-pucked/html|g' < $< > $@
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|planetarium|g' < $< > $@
-\input texinfo @c -*-Texinfo-*-
+\input texinfo @c -*-texinfo-*-
@comment %**start of header
-@setfilename mit-scheme-pucked-planetarium.info
+@setfilename planetarium.info
@include version.texi
-@settitle Planetarium @value{VERSION}
+@set SCMVERS 9.2.7
+@settitle Planetarium Plugin Manual
@comment %**end of header
@copying
-This manual documents a planetarium plugin for MIT/GNU Scheme Pucked,
-version @value{VERSION}.
+This manual documents MIT/GNU Scheme Pucked Planetarium @value{VERSION}.
Copyright @copyright{} 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014,
2015, 2016, 2017 Matthew Birkholz
@dircategory Programming Languages
@direntry
-* MIT/GNU Scheme Pucked Planetarium: (mit-scheme-pucked-planetarium).
- Planetarium.
+* Planetarium: (mit-scheme-pucked/planetarium).
+ A tellurion and terrain viewer.
@end direntry
@titlepage
-@title Planetarium User's Manual
+@title Planetarium Plugin Manual
+@subtitle a planetarium (version @value{VERSION})
+@subtitle for MIT/GNU Scheme Pucked version @value{SCMVERS}
+@subtitle @value{UPDATED}
@author by Matt Birkholz
@page
@vskip 0pt plus 1filll
@ifnottex
@node Top, Introduction, (dir), (dir)
-@top Planetarium
+@top Planetarium Plugin Manual
@insertcopying
@end ifnottex
(load-option-quietly 'ffi)
((environment-lookup (->environment '(ffi)) 'c-generate) library prefix))
-(define (update-optiondb directory)
+(define (add-plugin name project infodir scmlibdir scmdocdir)
(load-option-quietly 'ffi)
- ((environment-lookup (->environment '(ffi)) 'update-optiondb) directory))
+ ((environment-lookup (->environment '(ffi)) 'add-plugin)
+ name project infodir scmlibdir scmdocdir))
-(define (update-html-index directory)
+(define (remove-plugin name project infodir scmlibdir scmdocdir)
(load-option-quietly 'ffi)
- (load-option-quietly 'regular-expression)
- ((environment-lookup (->environment '(ffi)) 'update-html-index) directory))
+ ((environment-lookup (->environment '(ffi)) 'remove-plugin)
+ name project infodir scmlibdir scmdocdir))
(define (load-option-quietly name)
(if (not (option-loaded? name))
(with-notification
(lambda (port)
(write-string "Loading " port)
- (write-string (string-upcase (symbol-name name)) port)
+ (write-string (symbol->string name) port)
(write-string " option" port))
kernel)))))
\f
plugin-available?
register-c-callback
set-alien/ctype!
- update-html-index
- update-optiondb)
+ add-plugin
+ remove-plugin)
(initialization (initialize-package!)))
(define-package (runtime program-copier)
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)x11-screen
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
sources = @MIT_SCHEME_SCMs@
scmlib_sub_DATA = $(sources) $(binaries)
scmlib_sub_DATA += make.scm @MIT_SCHEME_PKD@
-#info_TEXINFOS = mit-scheme-x11-screen.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = x11-screen.info
+#info_TEXINFOS = x11-screen.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
@MIT_SCHEME_DEPS@
stamp-scheme: $(sources) x11-screen.pkg
EXTRA_DIST += make.scm optiondb.scm debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "x11-screen" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "x11-screen" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "x11-screen" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
-# [ -d "$(DESTDIR)$(htmldir)" ] \
-# && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode )
AM_INIT_AUTOMAKE
AC_PROG_INSTALL
+
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_DEPS="${MIT_SCHEME_DEPS}
${MIT_SCHEME_PKD}: stamp-scheme"
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_INCLUDEDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|x11-screen|g' < $< > $@
MIT_SCHEME_EXE = @MIT_SCHEME_EXE@
scmlibdir = @MIT_SCHEME_LIBDIR@
scmlib_subdir = $(scmlibdir)x11
+scmdocdir = $(datarootdir)/doc/@MIT_SCHEME_PROJECT@
+#scminfodir = $(scmdocdir)/info
scmlib_LTLIBRARIES = x11-shim.la
scmlib_DATA = x11-types.bin x11-const.bin
scmlib_sub_DATA = $(sources) $(binaries)
scmlib_sub_DATA += make.scm @MIT_SCHEME_PKD@
-#info_TEXINFOS = mit-scheme-x11.texi
-AM_MAKEINFOHTMLFLAGS = --no-split
-
-# Set these to the defaults used by Scheme.
-infodir = $(datarootdir)/info
-htmldir = $(libdir)/mit-scheme-pucked/doc
-dvidir = $(libdir)/mit-scheme-pucked/doc
-pdfdir = $(libdir)/mit-scheme-pucked/doc
+#scminfo_DATA = x11.info
+#info_TEXINFOS = x11.texi
+#AM_MAKEINFOHTMLFLAGS = --no-split
+#AM_UPDATE_INFO_DIR = no
AM_CPPFLAGS = -I@MIT_SCHEME_INCLUDEDIR@
AM_CFLAGS = @MIT_CFLAGS@
EXTRA_DIST += make.scm optiondb.scm tags-fix.sh debian
install-data-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(add-plugin "x11" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-html: install-html-am
+ ( echo '(add-plugin "x11" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
+
+install-info-am:
-#install-html: install-html-am
-# echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode
+uninstall-info-am:
uninstall-hook:
- if [ -f "$(DESTDIR)$(scmlibdir)optiondb.scm" ]; then \
- echo '(update-optiondb "$(DESTDIR)$(scmlibdir)")' \
- | $(MIT_SCHEME_EXE) --batch-mode; fi
+ ( echo '(remove-plugin "x11" "@MIT_SCHEME_PROJECT@"'; \
+ echo ' "$(DESTDIR)$(infodir)"'; \
+ echo ' "$(DESTDIR)$(scmlibdir)"'; \
+ echo ' "$(DESTDIR)$(scmdocdir)")' ) \
+ | $(MIT_SCHEME_EXE) --batch-mode
[ -d "$(DESTDIR)$(scmlib_subdir)" ] \
&& rmdir "$(DESTDIR)$(scmlib_subdir)"
-# [ -d "$(DESTDIR)$(htmldir)" ] \
-# && ( echo '(update-html-index "$(DESTDIR)$(htmldir)/")' \
-# | $(MIT_SCHEME_EXE) --batch-mode )
AC_MSG_ERROR([X11 not found.])
fi
+MIT_SCHEME_PROJECT=mit-scheme-pucked
: ${MIT_SCHEME_EXE=mit-scheme}
MIT_SCHEME_LIBDIR=`( echo "(display (->namestring" ;\
echo " (system-library-directory-pathname)))" ) \
MIT_SCHEME_DEPS="${MIT_SCHEME_DEPS}
${MIT_SCHEME_PKD}: stamp-scheme"
+# Install plugin docs in Scheme's docdir subdirectories.
+htmldir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/html'
+pdfdir='$(datarootdir)/doc/$(MIT_SCHEME_PROJECT)/pdf'
+
AC_SUBST([MIT_CFLAGS])
+AC_SUBST([MIT_SCHEME_PROJECT])
AC_SUBST([MIT_SCHEME_EXE])
AC_SUBST([MIT_SCHEME_LIBDIR])
AC_SUBST([MIT_SCHEME_INCLUDEDIR])
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(add-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
set -e
-echo '(update-optiondb (system-library-directory-pathname))' \
+( echo '(remove-plugin "@PLUGIN@" "@PROJECT@"'; \
+ echo ' "@INFODIR@"'; \
+ echo ' (system-library-directory-pathname)'; \
+ echo ' "@SCMDOCDIR@")' ) \
| mit-scheme-pucked --batch-mode
exit 0
export MIT_SCHEME_EXE=mit-scheme-pucked
-%:
+%: debian/postinst debian/prerm
dh $@
+
+debian/%: debian/%.in
+ sed -e 's|@SCMDOCDIR@|/usr/share/doc/mit-scheme-pucked|g' \
+ -e 's|@INFODIR@|/usr/share/info|g' \
+ -e 's|@PROJECT@|mit-scheme-pucked|g' \
+ -e 's|@PLUGIN@|x11|g' < $< > $@