 
       (define-key jpw-lj-mode-map "\M-gd" 'jpw-html-del)
 
+      (define-key jpw-lj-mode-map "\M-g\C-s" 'jpw-html-size-small)
+      (define-key jpw-lj-mode-map "\M-g\C-b" 'jpw-html-size-big)
+      (define-key jpw-lj-mode-map "\M-g\C-r" 'jpw-html-size-relative)
+      (define-key jpw-lj-mode-map "\M-gz" 'jpw-lj-insert-size)
       (define-key jpw-lj-mode-map "\M-g\M-s" 'jpw-lj-insert-size)
-
 
       (define-key jpw-lj-mode-map "\M-p\C-i" 'html-image)
 



(defgroup jpw-lj nil
  "Customizable aspects of jpw-lj-mode.
{jpw: 03/06}"
  :group 'hypermedia
  :group 'local)


(defface jpw-lj-bold-face 



;; Regexp for nested size tags
;; Must prepend to keep the default `html-mode' fontification from overriding
;; this one.
(defconst jpw-lj-font-lock-small-face-key-3
  (list
   (concat
    "<small>"
    "\\([^<]*\\(<[^/]+/[^sb][^>]*>[^<]*\\)*\\)"
    "</small>"
    ) ;;end concat
   '(1 'jpw-lj-size-face prepend)
   ) ;;end list
  ) ;;end defconst


;; Regexp for nested size tags
;; Must prepend to keep the default `html-mode' fontification from overriding
;; this one.
(defconst jpw-lj-font-lock-big-face-key-3
  (list
   (concat
    "<big>"
    "\\([^<]*\\(<[^/]+/[^sb][^>]*>[^<]*\\)*\\)"
    "</big>"
    ) ;;end concat
   '(1 'jpw-lj-size-face prepend)
   ) ;;end list
  ) ;;end defconst


;; Regexp for nested size tags
(defconst jpw-lj-font-lock-size-face-key-3
  (list
   (concat
     "<span style=\"font-size: [^>]+>" 
