debian/patches/0008-Fix-problems-in-guile-tut.texi-that-cause-makeinfo-t.patch

   1 From 030f81c1db8ad626e75d1a2ab0916c9594aab65b Mon Sep 17 00:00:00 2001
   2 From: Hideki Yamane <henrich@debian.or.jp>
   3 Date: Sun, 9 Feb 2014 12:32:47 -0600
   4 Subject: Fix problems in guile-tut.texi that cause makeinfo to fail.
   5
   6 [rlb@defaultvalue.org: adjust commit message.]
   7
   8 Bug-Debian: http://bugs.debian.org/711029
   9 ---
  10  doc/tutorial/guile-tut.texi | 12 ++++++------
  11  1 file changed, 6 insertions(+), 6 deletions(-)
  12
  13 diff --git a/guile18/doc/tutorial/guile-tut.texi b/guile18/doc/tutorial/guile-tut.texi
  14 index 80903e6..c220b2f 100644
  15 --- a/guile18/doc/tutorial/guile-tut.texi
  16 +++ b/guile18/doc/tutorial/guile-tut.texi
  17 @@ -446,7 +446,7 @@ get started, look at the books @cite{Simply Scheme} and @cite{The Little
  18  Schemer} from that list.}
  19
  20
  21 -@subsection Hello World
  22 +@section Hello World
  23  @cindex hello world
  24
  25  Our first program is the typical Scheme "hello world" program.  Put the
  26 @@ -535,12 +535,12 @@ guile> @kbd{(memq 4 ls)}
  27  guile> @kbd{(if (memq 4 ls)
  28             (display "hey, it's true!\n")
  29             (display "dude, it's false\n"))}
  30 -       @print{hey, it's true!}
  31 +       @print{} hey, it's true!
  32         @result{}
  33  guile> @kbd{(if (memq 12 ls)
  34             (display "hey, it's true!\n")
  35             (display "dude, it's false\n"))}
  36 -       @print{dude, it's false}
  37 +       @print{} dude, it's false
  38         @result{}
  39  guile> @kbd{(memq 4 (reverse ls))}
  40         @result{} (4 3 2 1)
  41 @@ -656,9 +656,9 @@ And then invoke it with
  42  (represent-matrix m
  43                    (lambda (x) (begin (display x) (display " ")))
  44                    (lambda (l) (begin (display "\n"))))
  45 -@print{7 2 1 3 2 8 5 3 6}
  46 -@print{4 1 1 1 3 8 9 8 1}
  47 -@print{5 5 4 8 1 8 2 2 4}
  48 +@print{} 7 2 1 3 2 8 5 3 6
  49 +@print{} 4 1 1 1 3 8 9 8 1
  50 +@print{} 5 5 4 8 1 8 2 2 4
  51  @end smalllisp
  52
  53  @cindex objects