+;;; @@ for emh-comp.el
+;;;
+
+(autoload 'emh-edit-again "emh-comp"
+ "Clean-up a draft or a message previously sent and make it resendable." t)
+(autoload 'emh-extract-rejected-mail "emh-comp"
+ "Extract a letter returned by the mail system and make it re-editable." t)
+(autoload 'emh-forward "emh-comp"
+ "Forward a message or message sequence by MIME style." t)
+
+(eval-after-load
+ "mh-e"
+ '(progn
+ (substitute-key-definition
+ 'mh-edit-again 'emh-edit-again
+ mh-folder-mode-map)
+ (substitute-key-definition
+ 'mh-extract-rejected-mail 'emh-extract-rejected-mail
+ mh-folder-mode-map)
+ (substitute-key-definition
+ 'mh-forward 'emh-forward
+ mh-folder-mode-map)
+ ))
+
+(eval-after-load "mh-comp" '(require 'emh-comp))
+
+