More versions, notices, project names out-of-date.

diff --git a/.gitignore b/.gitignore
index 13f5a2eba081eb056b2226328f94666b9c0a83b4..86dae73c90011fba4dfed1bbbe3c797e9591183c 100644 (file)
--- a/.gitignore
+++ b/.gitignore
@@ -24,7 +24,6 @@
 /C-*/
 /C/
 /LOG
-/debian*/
 /html/
 /linux*/
 /macos/

diff --git a/debian/mit-scheme-pucked.desktop b/debian/mit-scheme-pucked.desktop
index 169c679f40d84ab02044193f7901770a735844e3..2eec5f453c38c0a4eb836bf1e0c3807ab37d25d3 100644 (file)
--- a/debian/mit-scheme-pucked.desktop
+++ b/debian/mit-scheme-pucked.desktop
@@ -1,5 +1,5 @@
 [Desktop Entry]
-Version=9.2.1.1
+Version=9.2.7
 Name=Friar Puck's MIT/GNU Scheme
 Exec=/usr/bin/mit-scheme-pucked --edit
 TryExec=mit-scheme-pucked

diff --git a/doc/configure.ac b/doc/configure.ac
index 6302e24f995a590a661e3f44c8c4d50ff869a9a2..56d080c7dd87fb5de4a460d8df3f07b35cca02dc 100644 (file)
--- a/doc/configure.ac
+++ b/doc/configure.ac
@@ -1,7 +1,7 @@
 dnl Process this file with autoconf to produce a configure script.
 
 AC_INIT([MIT/GNU Scheme documentation],
-       [9.2.1],
+       [9.2.7],
        [matt@birchwood-abbey.net],
        [mit-scheme-pucked-doc])
 AC_CONFIG_SRCDIR([ref-manual/scheme.texinfo])

diff --git a/src/microcode/boot.c b/src/microcode/boot.c
index faecff089381b3baa85dda670abe9f622d4d661a..c6654ca528bfc8e36b07f210dbf4590caa5a1677 100644 (file)
--- a/src/microcode/boot.c
+++ b/src/microcode/boot.c
@@ -133,7 +133,7 @@ start_scheme (void)
 
   if (!option_batch_mode && !option_show_version && !option_show_help)
     {
-      outf_console ("MIT/GNU Scheme running under %s\n", OS_Variant);
+      outf_console ("MIT/GNU Scheme Pucked running under %s\n", OS_Variant);
       OS_announcement ();
       outf_console ("\n");
       outf_flush_console ();

diff --git a/src/runtime/version.scm b/src/runtime/version.scm
index af26be91ebd59035e5e78d24fb553437dce1d986..aaab0ca3a37741d0cd0376ea5a41cb0d899011ee 100644 (file)
--- a/src/runtime/version.scm
+++ b/src/runtime/version.scm
@@ -55,6 +55,9 @@ USA.
             (guarantee textual-output-port? port 'WRITE-MIT-SCHEME-COPYRIGHT)))
        (cmark (if (default-object? cmark) "(C)" cmark))
        (line-prefix (if (default-object? line-prefix) "" line-prefix)))
+    (write-words `("Copyright" ,cmark ,(number->string last-copyright-year)
+                  "Matthew" "Birkholz")
+                line-prefix "    " port)
     (write-words (let ((years (map number->string copyright-years)))
                   `("Copyright"
                     ,cmark