*** dist/vm-misc.el.dist	Mon Mar  4 07:57:01 2002
--- vm-misc.el	Mon Mar  4 08:38:16 2002
***************
*** 827,828 ****
--- 827,829 ----
  (defvar enable-multibyte-characters)
+ (defvar buffer-display-table)
  (defun vm-fsfemacs-nonmule-display-8bit-chars ()
*** dist/vm-startup.el.dist	Mon Mar  4 07:57:02 2002
--- vm-startup.el	Mon Mar  4 16:13:56 2002
***************
*** 354,356 ****
  
! This is VM 7.02.
  
--- 354,356 ----
  
! This is VM 7.03.
  
*** dist/vm-vars.el.dist	Mon Mar  4 07:57:02 2002
--- vm-vars.el	Mon Mar  4 12:00:19 2002
***************
*** 262,264 ****
  has been specified."
!   :type 'sexp)
  
--- 262,265 ----
  has been specified."
!   :type '(choice (repeat string)
! 		 (repeat (list string string string))))
  
***************
*** 377,379 ****
  messages from the server."
!   :type 'sexp)
  
--- 378,380 ----
  messages from the server."
!   :type '(repeat (cons string boolean)))
  
***************
*** 387,389 ****
  t."
!   :type 'sexp)
  
--- 388,390 ----
  t."
!   :type 'boolean)
  
***************
*** 407,409 ****
  will use to refer to this maildrop when using `vm-visit-pop-folder'."
!   :type 'sexp)
  
--- 408,410 ----
  will use to refer to this maildrop when using `vm-visit-pop-folder'."
!   :type '(repeat (list string string)))
  
***************
*** 477,479 ****
  deleted from the mailbox immediately after retrieval."
!   :type 'sexp)
  
--- 478,480 ----
  deleted from the mailbox immediately after retrieval."
!   :type '(repeat (cons string boolean)))
  
***************
*** 933,935 ****
  No multipart message will ever be sent to an external viewer."
!   :type 'sexp)
  
--- 934,936 ----
  No multipart message will ever be sent to an external viewer."
!   :type '(repeat (list string string)))
  
***************
*** 1019,1021 ****
  The first matching list element will be used."
!   :type 'sexp)
  
--- 1020,1022 ----
  The first matching list element will be used."
!   :type '(repeat (list string string string)))
  
***************
*** 1048,1050 ****
  chosen."
!   :type 'sexp)
  
--- 1049,1054 ----
  chosen."
!   :type '(choice (choice (const 'best-internal)
! 			 (const 'best))
! 		 (cons (const favorite) (repeat string))
! 		 (cons (const favorite-internal) (repeat string))))
  
***************
*** 1124,1126 ****
  limitation."
!   :type 'sexp)
  
--- 1128,1130 ----
  limitation."
!   :type '(repeat (cons string string)))
  
***************
*** 1280,1282 ****
  the left instead of the right."
!   :type 'sexp)
  
--- 1284,1286 ----
  the left instead of the right."
!   :type '(repeat (cons string string)))
  
***************
*** 1380,1382 ****
  value of `vm-infer-mime-types' is non-nil."
!   :type 'sexp)
  
--- 1384,1386 ----
  value of `vm-infer-mime-types' is non-nil."
!   :type '(repeat (cons regexp string)))
  
***************
*** 1418,1420 ****
  with the first type that matches will be used."
!   :type 'sexp)
  
--- 1422,1424 ----
  with the first type that matches will be used."
!   :type '(repeat (cons string string)))
  
***************
*** 1431,1433 ****
  any relative pathnames will be relative to this directory."
!   :type (choice (const nil) directory))
  
--- 1435,1437 ----
  any relative pathnames will be relative to this directory."
!   :type '(choice (const nil) directory))
  
***************
*** 1648,1650 ****
  will be unwittingly lost."
!   :type '(const t) (const nil) (const if-something-will-be-lost))
  
--- 1652,1654 ----
  will be unwittingly lost."
!   :type '(choice (const t) (const nil) (const if-something-will-be-lost)))
  
***************
*** 1741,1743 ****
  are always matched case insensitively."
!   :type 'sexp)
  
--- 1745,1747 ----
  are always matched case insensitively."
!   :type '(repeat (cons regexp (repeat (cons regexp sexp)))))
  
***************
*** 2787,2789 ****
  the function `make-frame'."
!   :type 'sexp)
  
--- 2791,2800 ----
  the function `make-frame'."
!   :type '(repeat (list (choice completion)
! 		       (choice composition)
! 		       (choice edit)
! 		       (choice folder)
! 		       (choice folders-summary)
! 		       (choice primary-folder)
! 		       (choice summary))
! 		 (repeat (cons symbol sexp))))
  
***************
*** 2920,2933 ****
  window system."
!   :type (list (choice dispose)
! 	      (choice emacs)
! 	      (choice folder)
! 	      (choice help)
! 	      (choice label)
! 	      (choice mark)
! 	      (choice motion)
! 	      (choice send)
! 	      (choice sort)
! 	      (choice undo)
! 	      (choice virtual)
! 	      (choice nil)))
  
--- 2931,2944 ----
  window system."
!   :type '(list (choice dispose)
! 	       (choice emacs)
! 	       (choice folder)
! 	       (choice help)
! 	       (choice label)
! 	       (choice mark)
! 	       (choice motion)
! 	       (choice send)
! 	       (choice sort)
! 	       (choice undo)
! 	       (choice virtual)
! 	       (choice nil)))
  
***************
*** 3042,3044 ****
  there are N or less messages."
!   (choice (const t) (const nil) integer))
  
--- 3053,3055 ----
  there are N or less messages."
!   :type '(choice (const t) (const nil) integer))
  
*** dist/vm-version.el.dist	Mon Mar  4 07:57:02 2002
--- vm-version.el	Mon Mar  4 16:13:56 2002
***************
*** 4,6 ****
  
! (defconst vm-version "7.02"
    "Version number of VM.")
--- 4,6 ----
  
! (defconst vm-version "7.03"
    "Version number of VM.")