   "<code>" _ "</code>")
 
 
+(define-skeleton jpw-lj-html-footnote
+  "Insert HTML tags for 'xx-small' text, in parentheses.
+italics tags.
+{jpw: 03/2006}"
+  nil
+  "<spanstyle=\"font-size: xx-small\">(" _ ")</span>")
+
+
 (define-skeleton jpw-lj-user
   "A LiveJournal \"user\" tag."
   "Who? "


(defconst jpw-lj-entity-shortcut-table
  '(
    (":<=" . "&le;")
    (":<" . "&lt;")
    (":>=" . "&ge;")
    (":>" . "&gt;")
    (":===" . "&equiv;")
    (":~=" . "&cong;")
    (":~" . "&sim;")
    (":~~" . "&asymp;")
    (":<->" . "&darr;")
    (":<-" . "&larr;")
    (":->" . "&rarr;")
    (":<==" . "&lArr;")
    (":==>" . "&rArr;")
    (":---" . "&mdash;")
    (":--" . "&ndash;")
    (":..." . "&hellip;")
    ("<->" . "&darr;")
    ("<-" . "&larr;")
    ("->" . "&rarr;")
    ("<==" . "&lArr;")
    ("==>" . "&rArr;")
    ("---" . "&mdash;")
    ("--" . "&ndash;")
    ("..." . "&hellip;")

(define-skeleton html-ordered-list
  "XHTML ordered list tags."
  nil
  "<ol><li>" _ "</li>" \n
  "</ol>")

(define-skeleton html-unordered-list
  "XHTML unordered list tags."
  nil
  "<ul><li>" _ "</li>" \n
  "</ul>")

(define-skeleton html-list-item
