From d7c58989082335fc3d22e71e8132c3441d8ae9da Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Fri, 27 Oct 2023 15:58:57 +0200
Subject: Fix some incorrect strings in documentation.

---
 doc/ref/general/util-type.texi        | 2 +-
 module/calp/entry-points/terminal.scm | 3 +--
 module/calp/main.scm                  | 2 +-
 po/sv.po                              | 6 +++---
 4 files changed, 6 insertions(+), 7 deletions(-)

diff --git a/doc/ref/general/util-type.texi b/doc/ref/general/util-type.texi
index 61149566..6c100c86 100644
--- a/doc/ref/general/util-type.texi
+++ b/doc/ref/general/util-type.texi
@@ -49,7 +49,7 @@ Also used if new ``primitives'' are to be added, such as list-of.
 
 @defmac typecheck variable type-clause [procedure-name=(current-procedure-name)]
 Checks @var{variable} against @var{type-clause}, and raises
-@code{'wrong-type-argument} if it fails. @var{procedure-name} is used
+@code{'wrong-type-arg} if it fails. @var{procedure-name} is used
 as the calling procedure for @code{scm-error}.
 
 Useful at the start of procedures.
diff --git a/module/calp/entry-points/terminal.scm b/module/calp/entry-points/terminal.scm
index 9a1b8b00..fa3dd41d 100644
--- a/module/calp/entry-points/terminal.scm
+++ b/module/calp/entry-points/terminal.scm
@@ -25,5 +25,4 @@
   (let ((date (or (and=> (option-ref opts 'date #f) parse-freeform-date)
                   (current-date))))
     (with-vulgar
-     (lambda () (main-loop date))))
-)
+     (lambda () (main-loop date)))))
diff --git a/module/calp/main.scm b/module/calp/main.scm
index 90e7e115..9bc8cdf8 100644
--- a/module/calp/main.scm
+++ b/module/calp/main.scm
@@ -79,7 +79,7 @@ contain all events.
     "<center><b>" (G_ "Modes") "</b></center>
 <br/><br/>"
     (G_ "<p><b>html</b> reads calendar files from disk, and writes them to static HTML files.</p>")
-    (G_ "<p><b>terminal</b> loads the calendars, and starts an interactive terminal interface.</p>")
+    (G_ "<p><b>term</b> loads the calendars, and starts an interactive terminal interface.</p>")
     (G_ "[UNTESTED]<br/><p><b>import</b>s a calendar object into the database.</p>")
     (G_ "<p><b>text</b> formats and justifies what it's given on standard input,
 and writes it to standard output. Similar to this text.</p>")
diff --git a/po/sv.po b/po/sv.po
index 8021951a..c27d5361 100644
--- a/po/sv.po
+++ b/po/sv.po
@@ -643,10 +643,10 @@ msgid   "<p><b>html</b> reads calendar files from disk, and writes them to "
 msgstr  "<p><b>html</b> läser kalenderfiler från disk, och matar ur sig "
         "statiska HTML-filer.</p>"
 
-msgid   "<p><b>terminal</b> loads the calendars, and starts an interactive "
+msgid   "<p><b>term</b> loads the calendars, and starts an interactive "
         "terminal interface.</p>"
-msgstr  "<p><b>terminal</b> laddar kalendrar, och startar ett en interaktiv "
-        "miljö i terminalen.</p>"
+msgstr  "<p><b>term</b> laddar kalendrar, och startar ett en interaktiv miljö "
+        "i terminalen.</p>"
 
 msgid   "<p><b>ical</b> loads the calendar database, and immediately\n"
         "re-serializes it back into iCAL format. Useful for merging calendars."
-- 
cgit v1.2.3