iankelling.org
/
git
/
iankelling.org
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix feed links
[iankelling.org]
/
iank-mod.el
diff --git
a/iank-mod.el
b/iank-mod.el
index 26da79d7a68667b529f51fa7073f67a097a97069..4faea5f958d70d4d42953584745fa74325db9b5b 100644
(file)
--- a/
iank-mod.el
+++ b/
iank-mod.el
@@
-38,6
+38,12
@@
(interactive)
(iankmod-set-state "banned"))
(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"))
(defun iankmod-moderate ()
(interactive)
(iankmod-set-state "moderated"))
@@
-49,4
+55,5
@@
(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 "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))
map))