Fixed a couple of typos.

src/docgen.el

@@ -64,7 +64,7 @@
     (let ((s str))
       (setq s (replace-in-string s "&" "&"))
       (setq s (replace-in-string s "<" "&lt;"))
-      (setq s (replace-in-string s ">" "&lt;"))
+      (setq s (replace-in-string s ">" "&gt;"))
       s)))
 
 (defun lyskom-docgen-get-name (fn lang)
@@ -95,7 +95,7 @@
                 (lyskom-docgen-error "%s: reference to non-command %s" fn sym))
               (setq result
                     (concat result
-                            (format "<link linkend=\"fn:%s\"><command>%s</command></link> (<link linkend=\"fn:%s\"><function>%s</function></link>)"
+                            (format "<link linkend=\"fn:%s\"><command>%s</command></link> [<link linkend=\"fn:%s\"><function>%s</function></link>]"
                                     sym
                                     (lyskom-docgen-get-name fn 'en)
                                     sym
@@ -140,9 +140,9 @@
            (doc-en (lyskom-docgen-get-doc command)))
       (lyskom-docgen-princ
        (format "\
-    <section id=\"fn:%s\"><title>%s (%s)</title>
+    <section id=\"fn:%s\"><title>%s [%s]</title>
 
-    <informaltable frame=\"top\">
+    <informaltable frame=\"topbot\">
       <tgroup cols=\"2\">
         <tbody valign=\"top\">
           <row>