(interactive)
(iankmod-set-state "banned"))
+;; for test comments, or comments we just want to delete from the
+;; db for whatever reason.
+(defun iankmod-delete ()
+ (interactive)
+ (iankmod-set-state "delete"))
+
(defun iankmod-moderate ()
(interactive)
(iankmod-set-state "moderated"))
(define-key map (kbd "b") 'iankmod-ban)
(define-key map (kbd "m") 'iankmod-moderate)
(define-key map (kbd "x") 'iankmod-save)
+ (define-key map (kbd "d") 'iankmod-delete)
map))