-(defun riece-foolproof-enable ()
- (setq riece-foolproof-enabled t))
-
-(defun riece-foolproof-disable ()
- (setq riece-foolproof-enabled nil))
+(defun riece-foolproof-uninstall ()
+ (remove-hook 'riece-command-send-message-hook
+ 'riece-foolproof-command-send-message-function))