--- a/contrib/mq.el	Thu Oct 11 05:58:54 2007 +0900
+++ b/contrib/mq.el	Thu Oct 11 06:01:30 2007 +0900
@@ -63,6 +63,9 @@
 (make-variable-buffer-local 'mq-prev-buffer)
 (put 'mq-prev-buffer 'permanent-local t)
 
+(defvar mq-top nil)
+(make-variable-buffer-local 'mq-top)
+(put 'mq-top 'permanent-local t)
 
 ;;; Global keymap.