← Back to team overview

vm team mailing list archive

vm-fill-paragraphs-containing-long-lines

 

This fill command goes into an infinite loop on some messages which have
Mime.  It stops when the above variable is set to nil.  I note that my setup
has (setq vm-display-using-mime t).  Here is a sample:

--- Begin Message ---


Dan -- I think there is a small discrepancy between the physics draft and your Atonement Letter, eq. 4.23 (equiv. recent letter eq. 6). In equation 12.14 of the physics draft you will see some extra \bar's on \kappa and u, after translating the notation. Q_\CX \to \mu. I prefer to call \tilde\kappa by \kappa_{KR}.

Greg


Dan Freed wrote:
I hope now the derivation applies to all cases, even if w_1(F) is nonzero.
This needs to be checked more carefully.


Jacques Distler wrote:
Thanks for the notes.

There are many things I don't understand.

Let's start with the end.

* Why is there a "z" on the RHS of equation (8)? Was there supposed to have been a "z" on the LHS?
That's just a typo. Dan forgot to delete the \psi(z). I'm not sure of some of the other factors, like the overall 4.


* Assuming a corrected version of (8), can I not take $\tilde{\psi}^{-1}$ of both sides, and thereby obtain the desired formula for $\Lambda$?
Yes you can!! But, as Dan says, you cannot write separately C/ \psi^{-1}(Euler) for some cannibilistic class C. This really feels right. I think with some minor corrections equation 8 really is the equation we want. (Finally!)


* You remark, at the end, "we cannot apply \tilde{\psi}^{-1}$ to $U$". Obviously, we can apply it to the whole of the RHS of (8) That seems good enough for me.
I believe that when w1(F) =0, which, by the way, is automatic when the Z2 action is a pinvolution, and hence applies rather broadly, then you can apply it separately and we recover the old formula in terms of C/ \psi^{-1}(Euler) . The point is that when w1(F) is nonzero neither numerator nor denominator makes sense, but the combination makes
sense.


* Is there an interpretation for the combination $U/\tilde{\psi}(U')$? Can one think of it as some sort of Euler class?

Indeed, it would be good to understand it better. When w1(\nu(F)) = 0 it is \tilde\psi of the cannibilistic class. But I'm sure there's more to say about this. In any case it plays the role in the chern character computation that the cannibilistic class did.


I have more questions, but let me stop there, for the moment.

--- End Message ---

Emacs  : GNU Emacs 22.2.1 (x86_64-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2008-09-05 on yellow, modified by Ubuntu
Package: VM 8.1.0-beta

current state:
==============
(setq
 features '(reporter pp thingatpt shell comint ring rfc822 pgg-gpg vm-avirtual
	    time-date vm-virtual w3m-form w3m-symbol vm-w3m w3m timezone
	    w3m-hist w3m-e21 wid-edit w3m-ccl ccl w3m-fsf w3m-favicon
	    w3m-image w3m-proc w3m-util vm-sort vm-delete mail-utils flyspell
	    ispell mailalias vm-save tapestry vm-pgg vm-reply easymenu pgg
	    pgg-parse pgg-def vm-rfaddons sendmail regexp-opt vm-menu
	    vm-window vm-toolbar vm-folder vm-mime vm-undo vm-summary vm-mouse
	    vm-page vm-motion vm-minibuf vm-misc vm newcomment time vm-pine
	    vm-macro vm-message vm-autoloads vm-vars vm-version browse-url
	    w3m-load path-util byte-opt bytecomp byte-compile advice help-fns
	    help-mode view advice-preload poe pym static apel-ver product
	    tex-site tooltip ediff-hook vc-hooks lisp-float-type x-dnd
	    tool-bar mwheel dnd fontset image fringe abbrev lisp-mode register
	    page menu-bar rfn-eshadow timer select scroll-bar mldrag mouse
	    jit-lock font-lock syntax facemenu font-core frame ucs-tables
	    georgian utf-8-lang misc-lang vietnamese tibetan thai lao korean
	    japanese hebrew greek romanian slovak czech european ethiopic
	    kannada tamil malayalam devanagari indian cyrillic chinese
	    case-table jka-cmpr-hook help simple button faces cus-face
	    text-properties overlay md5 base64 format mule env custom widget
	    backquote make-network-process x-toolkit x emacs)
 vm-always-use-presentation-buffer nil
 vm-arrived-message-hook nil
 vm-arrived-messages-hook nil
 vm-assertion-checking-off t
 vm-assimilate-html-command "striptags"
 vm-assimilate-html-mixed t
 vm-assimilate-new-messages-sorted nil
 vm-auto-center-summary 0
 vm-auto-decode-mime-messages t
 vm-auto-displayed-mime-content-type-exceptions nil
 vm-auto-displayed-mime-content-types '("message" "text" "image" "multipart")
 vm-auto-folder-case-fold-search t
 vm-auto-get-new-mail t
 vm-auto-next-message nil
 vm-berkeley-mail-compatibility nil
 vm-buffer-name-limit 80
 vm-buffer-type-debug nil
 vm-burst-digest-messages-inherit-labels t
 vm-check-folder-types t
 vm-circular-folders nil
 vm-coding-system-priorities nil
 vm-confirm-mail-send nil
 vm-confirm-new-folders t
 vm-confirm-quit 0
 vm-continue-postponed-message-hook nil
 vm-continue-what-message 'ask
 vm-convert-folder-types t
 vm-crash-box nil
 vm-crash-box-suffix ".crash"
 vm-curl-program "curl"
 vm-default-From_-folder-type 'From_
 vm-default-folder-permission-bits 384
 vm-default-folder-type 'From_
 vm-default-new-folder-line-ending-type nil
 vm-delete-after-archiving nil
 vm-delete-after-bursting nil
 vm-delete-after-saving t
 vm-delete-empty-folders t
 vm-delete-message-action "vm-next-message"
 vm-digest-burst-type "guess"
 vm-digest-center-preamble t
 vm-digest-identifier-header-format "X-Digest: %s\n"
 vm-digest-preamble-format "\"%s\" (%F)"
 vm-digest-send-type "mime"
 vm-disable-modes-before-encoding '(auto-fill-mode font-lock-mode
				    ispell-minor-mode flyspell-mode
				    abbrev-mode adaptive-fill-mode)
 vm-display-buffer-hook nil
 vm-display-using-mime t
 vm-display-xfaces nil
 vm-do-fcc-before-mime-encode nil
 vm-drop-buffer-name-chars "[^ a-zA-Z0-9.,_\"'+-]"
 vm-edit-message-hook nil
 vm-edit-message-mode 'text-mode
 vm-enable-addons '(check-recipients check-for-empty-subject encode-headers
		    take-action-on-attachment)
 vm-fetch-program "fetch"
 vm-fill-long-lines-in-reply-column nil
 vm-fill-paragraphs-containing-long-lines nil
 vm-firefox-client-program "firefox"
 vm-firefox-client-program-switches '("-remote")
 vm-firefox-program "firefox"
 vm-firefox-program-switches nil
 vm-flush-interval nil
 vm-folder-directory "~/Mailboxes/"
 vm-folder-file-precious-flag t
 vm-folder-read-only nil
 vm-folders-summary-database "~/.vm.folders.db"
 vm-folders-summary-directories '("~/")
 vm-folders-summary-format "  %12f %4t total, %n new, %u unread, %s spooled\n"
 vm-folders-summary-mode-hook nil
 vm-follow-summary-cursor t
 vm-forward-message-hook nil
 vm-forwarded-headers '("From:" "To:" "Subject:" "Date:")
 vm-forwarding-digest-type "mime"
 vm-forwarding-subject-format "forwarded message from %F"
 vm-frame-parameter-alist nil
 vm-frame-per-completion t
 vm-frame-per-composition t
 vm-frame-per-edit t
 vm-frame-per-folder t
 vm-frame-per-folders-summary nil
 vm-frame-per-help nil
 vm-frame-per-summary nil
 vm-grep-program "grep"
 vm-grepmail-arguments '("-q" "-m" "-R" "-e" "\"Dan Freed\"")
 vm-grepmail-command "grepmail"
 vm-handle-return-receipt-mode 'edit
 vm-handle-return-receipt-peek 500
 vm-highlight-url-face 'bold-italic
 vm-highlighted-header-face 'bold
 vm-highlighted-header-regexp nil
 vm-honor-mime-content-disposition nil
 vm-honor-page-delimiters nil
 vm-iconify-frame-hook nil
 vm-icontopbm-program "/usr/bin/icontopbm"
 vm-image-directory nil
 vm-imagemagick-convert-program "/usr/bin/convert"
 vm-imagemagick-identify-program "/usr/bin/identify"
 vm-imap-account-alist nil
 vm-imap-auto-expunge-alist nil
 vm-imap-bytes-per-session nil
 vm-imap-expunge-after-retrieving t
 vm-imap-expunge-retries 1
 vm-imap-folder-cache-directory nil
 vm-imap-max-message-size nil
 vm-imap-messages-per-session nil
 vm-imap-save-to-server nil
 vm-imap-server-list nil
 vm-imap-session-preauth-hook nil
 vm-imap-sync-on-get t
 vm-imap-tolerant-of-bad-imap 0
 vm-in-reply-to-format nil
 vm-included-mime-types-list '("text/plain" "text/html" "text/enriched"
			       "message/rfc822")
 vm-included-text-attribution-format "%F writes:\n\n"
 vm-included-text-discard-header-regexp nil
 vm-included-text-headers nil
 vm-included-text-prefix "> "
 vm-index-file-suffix nil
 vm-infer-mime-types t
 vm-init-file "~/.vm"
 vm-invisible-header-regexp nil
 vm-jump-to-new-messages t
 vm-jump-to-unread-messages t
 vm-keep-crash-boxes nil
 vm-keep-sent-messages 0
 vm-konqueror-client-program "kfmclient"
 vm-konqueror-client-program-switches nil
 vm-konqueror-program "konqueror"
 vm-konqueror-program-switches nil
 vm-load-headers-only nil
 vm-lynx-program "lynx"
 vm-mail-check-interval 300
 vm-mail-fcc-default '(or (vm-mail-select-folder vm-mail-folder-alist)
		       (vm-mail-to-fcc nil t) mail-archive-file-name)
 vm-mail-header-from nil
 vm-mail-header-insert-date t
 vm-mail-header-insert-message-id t
 vm-mail-header-order '("From:" "Organization:" "Subject:" "Date:" "Priority:"
			"X-Priority:" "Importance:" "Message-ID:"
			"MIME-Version:" "Content-Type:" "To:" "CC:" "BCC:"
			"Reply-To:")
 vm-mail-hook nil
 vm-mail-mode-citation-kill-regexp-alist '(("^\\( > [|{}>:;][^\n]*\n\\)+" .
					    "[...]\n")
					   ("^\\([^|{}>:;]+.*\\)\n > [|{}>:;]*$" . "\\1")
					   ("^ > [|{}>:;]*\n\\([^|{}>:;]\\)" .
					    "\\1")
					   ("^ > [|{}>:;]*\\s-*\n\\( > [|{}>:;]*\\s-*\n\\)+" . " > \n")
					   ("\n\n\n+" . "\n\n")
					   ("^ > --[^\n]*\n\\( > [^\n]*\n\\)+"
					    . "\n")
					   ("^ > ________[^\n]*\n\\( > [^\n]*\n\\)+" . "\n")
					   )
 vm-mail-mode-elide-reply-region "[...]\n"
 vm-mail-mode-fake-date-p t
 vm-mail-mode-hidden-headers '("References" "In-Reply-To" "X-Mailer")
 vm-mail-mode-hook '(lambda nil (font-lock-mode t)
		     (save-window-excursion (delete-other-windows)
		      (setq wht (/ (nth 3 (window-edges)) 2)))
		     (setq fill-column 77) (auto-fill-mode 1)
		     (if (< (window-height) wht)
		      (enlarge-window (- wht (window-height))))
		     (define-key vm-mail-mode-map "" (quote remove-FCC))
		     (define-key vm-mail-mode-map "" (quote add-pending))
		     (define-key vm-mail-mode-map "w"
		      (quote mail-simple-signature))
		     (define-key vm-mail-mode-map "\227"
		      (quote mail-simple-signature))
		     (define-key vm-mail-mode-map "\367"
		      (quote mail-alt-signature))
		     (define-key vm-mail-mode-map "W"
		      (quote mail-take-care-signature))
		     (define-key vm-mail-mode-map "\371"
		      (quote vm-yank-message-other-folder))
		     (define-key vm-mail-mode-map ""
		      (quote vm-add-address))
		     (define-key vm-mail-mode-map "\355"
		      (quote vm-mime-attach-file))
		     (define-key vm-mail-mode-map "\360"
		      (quote vm-mime-preview-composition))
		     (define-key vm-mail-mode-map "\f"
		      (quote vm-lookup-address))
		     (define-key vm-mail-mode-map ""
		      (quote mail-copy-address))
		     )
 vm-mail-mode-open-line-regexp "[ 	]*>"
 vm-mail-priority "Priority: urgent\nImportance: High\nX-Priority: 1"
 vm-mail-prompt-if-subject-empty t
 vm-mail-reorder-message-headers nil
 vm-mail-return-receipt-to "Dan Freed <>"
 vm-mail-send-hook '(vm-mail-check-for-empty-subject
		     (lambda nil (ispell-message) (setq askq t)
		      (save-excursion (goto-char (point-min))
		       (if (search-forward "Pending.mbox" (point-max) t)
			(setq askq nil))
		       )
		      (if askq
		       (progn
			(setq resp
			 (downcase
			  (read-from-minibuffer "Response pending? [y/n]: " ""
			   minibuffer-one-map)
			  )
			 )
			(if (string-equal resp "") (keyboard-quit))
			(if (string-equal resp "y") (add-pending)))
		       )
		      )
		     )
 vm-mail-subject-number-reply nil
 vm-mail-subject-prefix-replacements '(("\\(\\(re\\|aw\\|antw\\)\\(\\[[0-9]+\\]\\)?:[ 	]*\\)+" . "Re: ")
				       ("\\(\\(fo\\|wg\\)\\(\\[[0-9]+\\]\\)?:[ 	]*\\)+" . "Fo: ")
				       )
 vm-mail-to-headers '("To:" "CC:" "BCC:")
 vm-mail-to-regexp "\\([^<	\n ]+\\)@"
 vm-make-crash-box-name nil
 vm-make-spool-file-name nil
 vm-menu-hm-no-hidden-dirs t
 vm-menu-hm-tree-ls-flags "-aFLR"
 vm-menu-setup-hook nil
 vm-mime-7bit-composition-charset "us-ascii"
 vm-mime-8bit-composition-charset nil
 vm-mime-8bit-text-transfer-encoding 'quoted-printable
 vm-mime-all-attachments-directory nil
 vm-mime-alternative-select-method 'best-internal
 vm-mime-attach-files-in-directory-default-charset 'guess
 vm-mime-attach-files-in-directory-default-type nil
 vm-mime-attachment-auto-suffix-alist '(("image/jpeg" . ".jpg")
					("image/gif" . ".gif")
					("image/png" . ".png")
					("image/tiff" . ".tif")
					("text/html" . ".html")
					("audio/basic" . ".au")
					("video/mpeg" . ".mpg")
					("video/quicktime" . ".mov")
					("application/zip" . ".zip")
					("application/postscript" . ".ps")
					("application/pdf" . ".pdf")
					("application/msword" . ".doc")
					("application/vnd.ms-excel" . ".xls")
					("application/vnd.ms-powerpoint" .
					 ".ppt")
					("application/mac-binhex40" . ".hqx"))
 vm-mime-attachment-auto-type-alist '(("\\.jpe?g$" . "image/jpeg")
				      ("\\.gif$" . "image/gif")
				      ("\\.xbm$" . "image/xbm")
				      ("\\.png$" . "image/png")
				      ("\\.tiff?$" . "image/tiff")
				      ("\\.html?$" . "text/html")
				      ("\\.tex$" . "text/plain")
				      ("\\.txt$" . "text/plain")
				      ("\\.au$" . "audio/basic")
				      ("\\.mpe?g$" . "video/mpeg")
				      ("\\.mov$" . "video/quicktime")
				      ("\\.e?ps$" . "application/postscript")
				      ("\\.pdf$" . "application/pdf")
				      ("\\.ppt$" .
				       "application/x-mspowerpoint")
				      ("\\.xls$" . "application/vnd.ms-excel")
				      ("\\.dvi$" . "application/x-dvi")
				      ("\\.doc$" . "application/msword"))
 vm-mime-attachment-infer-type-for-text-attachments nil
 vm-mime-attachment-save-directory "~/tmp/"
 vm-mime-attachment-source-directory "~/tmp/"
 vm-mime-auto-save-all-attachments-subdir nil
 vm-mime-avoid-folding-content-type t
 vm-mime-base64-decoder-program "~/Unix/bin/base64-decode"
 vm-mime-base64-decoder-switches nil
 vm-mime-base64-encoder-program "~/Unix/bin/base64-encode"
 vm-mime-base64-encoder-switches nil
 vm-mime-button-face 'gui-button-face
 vm-mime-button-format-alist '(("multipart/encrypted" .
				"Decrypt PGP/MIME message")
			       ("application/pgp-keys" . "Snarf %d")
			       ("text" . "%-35.35(%d, %c%) [%k to %a]")
			       ("multipart/alternative" .
				"%-35.35(%d%) [%k to %a]")
			       ("multipart/digest" .
				"%-35.35(%d, %n message%s%) [%k to %a]")
			       ("multipart" .
				"%-35.35(%d, %n part%s%) [%k to %a]")
			       ("message/partial" .
				"%-35.35(%d, part %N (of %T)%) [%k to %a]")
			       ("message/external-body" .
				"%-35.35(%d%) [%k to %a (%x)]")
			       ("message" . "%-35.35(%d%) [%k to %a]")
			       ("audio" . "%-35.35(%d%) [%k to %a]")
			       ("video" . "%-35.35(%d%) [%k to %a]")
			       ("image" . "%-35.35(%d%) [%k to %a]")
			       ("application/octet-stream" .
				"%-35.35(%d, %f%) [%k to %a]")
			       )
 vm-mime-charset-converter-alist nil
 vm-mime-charset-font-alist nil
 vm-mime-composition-armor-from-lines nil
 vm-mime-confirm-delete t
 vm-mime-decode-for-preview t
 vm-mime-default-face-charset-exceptions nil
 vm-mime-default-face-charsets '("us-ascii")
 vm-mime-delete-after-saving nil
 vm-mime-delete-all-attachments-types '("application" "x-unknown"
					"application/x-gzip")
 vm-mime-delete-all-attachments-types-exceptions '("text")
 vm-mime-delete-viewer-processes nil
 vm-mime-deleted-object-label "[Deleted %f (%d;%t)]\n"
 vm-mime-digest-discard-header-regexp nil
 vm-mime-digest-headers '("Resent-" "From:" "Sender:" "To:" "Cc:" "Subject:"
			  "Date:" "Message-ID:" "Keywords:" "MIME-Version:"
			  "Content-")
 vm-mime-display-function nil
 vm-mime-display-image-strips-incrementally t
 vm-mime-display-internal-multipart/mixed-separater "\n----------------------------------------------------------------------\n"
 vm-mime-encode-headers-regexp "Subject\\|\\(\\(Resent-\\)?\\(From\\|To\\|CC\\|BCC\\)\\)\\|Organization"
 vm-mime-encode-headers-type 'Q
 vm-mime-encode-headers-words-regexp "\\s-\\(\\([^ 	\n
]*[^-]+[^ 	\n
]*\\)+\\(\\s-+\\([^ 	\n
]*[^-]+[^ 	\n
]*\\)+\\)*\\)"
 vm-mime-encode-words-regexp "[^-]+"
 vm-mime-external-content-type-exceptions '("text/plain" "text/html"
					    "image/xbm" "image/gif"
					    "image/jpeg" "image/png"
					    "image/jpg"
					    "application/postscript"
					    "application/pdf"
					    "application/x-dvi")
 vm-mime-external-content-types-alist '(("text" "openurl-file")
					("application" "openurl-file")
					("image" "openurl-file")
					("video" "openurl-file"))
 vm-mime-forward-local-external-bodies nil
 vm-mime-ignore-composite-type-opaque-transfer-encoding t
 vm-mime-ignore-mime-version t
 vm-mime-ignore-missing-multipart-boundary t
 vm-mime-internal-content-type-exceptions nil
 vm-mime-internal-content-types t
 vm-mime-max-message-size nil
 vm-mime-qp-decoder-program "/home/dafr/emacs/lisp/vm/src/qp-decode"
 vm-mime-qp-decoder-switches nil
 vm-mime-qp-encoder-program "/home/dafr/emacs/lisp/vm/src/qp-encode"
 vm-mime-qp-encoder-switches nil
 vm-mime-require-mime-version-header t
 vm-mime-save-all-attachments-types '("application" "x-unknown"
				      "application/x-gzip")
 vm-mime-save-all-attachments-types-exceptions '("text")
 vm-mime-show-alternatives nil
 vm-mime-text/html-blocker "<img[^>]*\\s-src=."
 vm-mime-text/html-blocker-exceptions nil
 vm-mime-text/html-handler 'emacs-w3m
 vm-mime-thumbnail-max-geometry "80x80"
 vm-mime-type-converter-alist nil
 vm-mime-ucs-list '(utf-8 iso-2022-jp ctext escape-quoted)
 vm-mime-use-image-strips t
 vm-mime-uuencode-decoder-program "uudecode"
 vm-mime-uuencode-decoder-switches nil
 vm-mime-write-file-filter-alist '(("application/mac-binhex40" . "hexbin -s "))
 vm-mime-yank-attachments nil
 vm-mmosaic-program "mMosaic"
 vm-mmosaic-program-switches nil
 vm-mode-hook '(lambda nil (make-local-variable (quote font-lock-defaults))
		(setq font-lock-defaults
		 (quote (vm-mode-font-lock-keywords t)))
		(font-lock-fontify-buffer)
		(define-key vm-mode-map "S" (quote vm-save-and-expunge-folder))
		(define-key vm-mode-map "H" (quote vm-save-for-home-netscape))
		(define-key vm-mode-map "a" (quote vm-add-address))
		(define-key vm-mode-map "A" (quote vm-set-message-attributes))
		(define-key vm-mode-map "I" (quote vm-reset-cached-data))
		(define-key vm-mode-map "U" (quote vm-set-usual-mode))
		(define-key vm-mode-map "\n" (quote vm-file-as-junk))
		(define-key vm-mode-map "l" (quote vm-lookup-address))
		(define-key vm-mode-map [C-return] (quote vm-goto-message))
		(define-key vm-mode-map [return]
		 (quote vm-mime-reader-map-display-using-external-viewer))
		(define-key vm-mode-map "b" (quote browse-url-at-point))
		(define-key vm-mode-map "," (quote vm-beginning-of-message))
		(define-key vm-mode-map "." (quote vm-end-of-message))
		(define-key vm-mode-map "\347" nil)
		(define-key vm-mode-map "\360" (quote vm-view-pending))
		(define-key vm-mode-map "\364" (quote vm-view-todo))
		(define-key vm-mode-map "\320" (quote vm-add-to-Pending))
		(define-key vm-mode-map "\357" (quote vm-view-outgoing))
		(define-key vm-mode-map "\323" (quote vm-forward-to-Sonia))
		(setq minibuffer-one-map (make-sparse-keymap))
		(define-key minibuffer-one-map [remap self-insert-command]
		 (quote self-insert-and-exit))
		)
 vm-mode-hooks nil
 vm-mosaic-program "Mosaic"
 vm-mosaic-program-switches nil
 vm-mouse-track-summary nil
 vm-move-after-deleting nil
 vm-move-after-killing nil
 vm-move-after-undeleting nil
 vm-move-messages-physically nil
 vm-movemail-program "movemail"
 vm-movemail-program-switches nil
 vm-mozilla-program "mozilla"
 vm-mozilla-program-switches nil
 vm-mutable-frames nil
 vm-mutable-windows t
 vm-netscape-program "netscape"
 vm-netscape-program-switches nil
 vm-opera-program "opera"
 vm-opera-program-switches nil
 vm-page-continuation-glyph "...press SPACE to see more..."
 vm-pgg-ask-function 'vm-pgg-prompt-for-action
 vm-pgg-auto-decrypt t
 vm-pgg-auto-snarf t
 vm-pgg-cleartext-search-limit 4096
 vm-pgg-compose-mode-string " vm-pgg"
 vm-pgg-fetch-missing-keys t
 vm-pgg-get-author-headers '("From:" "Sender:")
 vm-pgg-sign-text-transfer-encoding 'quoted-printable
 vm-pipe-messages-to-command-end "\n"
 vm-pipe-messages-to-command-start ""
 vm-pop-auto-expunge-alist nil
 vm-pop-bytes-per-session nil
 vm-pop-expunge-after-retrieving t
 vm-pop-folder-alist nil
 vm-pop-folder-cache-directory nil
 vm-pop-max-message-size nil
 vm-pop-md5-program "md5"
 vm-pop-messages-per-session nil
 vm-pop-read-quit-response t
 vm-popup-menu-on-mouse-3 t
 vm-postpone-message-hook '(vm-remove-save-killed-message-hook)
 vm-postponed-folder "postponed"
 vm-postponed-header "X-VM-postponed-data: "
 vm-postponed-message-discard-header-regexp nil
 vm-postponed-message-headers '("From:" "Organization:" "Reply-To:" "To:"
				"Newsgroups:" "CC:" "BCC:" "FCC:"
				"In-Reply-To:" "References:" "Subject:"
				"X-Priority:" "Priority:")
 vm-preferences-file "~/.vm.preferences"
 vm-presentation-mode-hook nil
 vm-preview-lines 0
 vm-preview-read-messages nil
 vm-primary-inbox "~/Mailboxes/Active.mbox"
 vm-print-command "lpr"
 vm-print-command-switches nil
 vm-ps-print-each-message-header-lines 2
 vm-ps-print-each-message-left-header '(list
					(format "(Folder `%s')" folder-name)
					(format "(%s)"
					 (vm-ps-print-tokenized-summary msg
					  (vm-summary-sprintf
					   vm-ps-print-each-message-summary-format msg t)
					  )
					 )
					)
 vm-ps-print-each-message-right-header '(list "/pagenumberstring load"
					 (quote dd-mon-yyyy))
 vm-ps-print-each-message-summary-format "Message# %n, Lines %l, Characters %c"
 vm-ps-print-message-font-size 10
 vm-ps-print-message-function 'ps-print-buffer-with-faces
 vm-ps-print-message-header-lines 2
 vm-ps-print-message-left-header '(list (format "(Folder `%s')" folder-name)
				   (format "(%d message%s printed)" mcount
				    (if (= mcount 1) "" "s"))
				   )
 vm-ps-print-message-right-header '(list "/pagenumberstring load"
				    (quote dd-mon-yyyy))
 vm-ps-print-message-separater "\n"
 vm-ps-print-message-summary-format "******************************************************************************\n%n %*%a %-17.17F %-3.3m %2d %4l/%-5c %I\"%s\"\n******************************************************************************\n"
 vm-quit-hook '(lambda nil (vm-expunge-folder))
 vm-raise-frame-at-startup t
 vm-recognize-imap-maildrops "^\\(imap\\|imap-ssl\\|imap-ssh\\):[^:]+:[^:]+:[^:]+:[^:]+:[^:]+:.+"
 vm-recognize-pop-maildrops "^\\(pop:\\|pop-ssl:\\|pop-ssh:\\)?[^:]+:[^:]+:[^:]+:[^:]+:.+"
 vm-rename-current-buffer-function nil
 vm-reply-hook '(lambda nil
		 (if include-text
		  (progn (insert "Dear ") (forward-word 1) (insert ",")
		   (kill-line) (insert "\n\n"))
		  )
		 )
 vm-reply-ignored-addresses '("dafr")
 vm-reply-ignored-reply-tos nil
 vm-reply-include-presentation nil
 vm-reply-subject-prefix "Re: "
 vm-resend-bounced-discard-header-regexp nil
 vm-resend-bounced-headers '("MIME-Version:" "Content-" "From:" "Sender:"
			     "Reply-To:" "To:" "Cc:" "Subject:" "Newsgroups:"
			     "In-Reply-To:" "References:" "Keywords:" "X-")
 vm-resend-bounced-message-hook nil
 vm-resend-discard-header-regexp "\\(\\(X400-\\)?Received:\\|Resent-\\)"
 vm-resend-headers nil
 vm-resend-message-hook nil
 vm-restore-saved-summary-formats nil
 vm-retrieved-spooled-mail-hook nil
 vm-rfc1153-digest-discard-header-regexp "\\(X400-\\)?Received:"
 vm-rfc1153-digest-headers '("Resent-" "Date:" "From:" "Sender:" "To:" "Cc:"
			     "Subject:" "Message-ID:" "Keywords:")
 vm-rfc934-digest-discard-header-regexp nil
 vm-rfc934-digest-headers '("Resent-" "From:" "Sender:" "To:" "Cc:" "Subject:"
			    "Date:" "Message-ID:" "Keywords:")
 vm-rmail-mode nil
 vm-rmail-mode-list '(vm-summary-mode)
 vm-save-killed-message 'ask
 vm-save-killed-messages-folder "postponed"
 vm-search-other-frames t
 vm-search-using-regexps nil
 vm-select-message-hook '(lambda nil
			  (make-local-variable (quote font-lock-defaults))
			  (setq font-lock-defaults
			   (quote (vm-mode-font-lock-keywords t)))
			  (font-lock-fontify-block))
 vm-select-new-message-hook nil
 vm-select-unread-message-hook nil
 vm-send-digest-hook nil
 vm-send-using-mime t
 vm-showing-message-hook nil
 vm-skip-deleted-messages t
 vm-skip-read-messages nil
 vm-spam-words-file "/home/dafr/.spam-words"
 vm-spamassassin-strip-report "spamassassin -d"
 vm-spool-file-suffixes nil
 vm-spool-files '(("~/Mailboxes/Active.mbox" "/d/mail/dafr"
		   "~/Mailboxes/Active.crash")
		  )
 vm-spooled-mail-waiting-hook nil
 vm-ssh-program "ssh"
 vm-ssh-program-switches nil
 vm-ssh-remote-command "echo ready; sleep 15"
 vm-startup-with-summary t
 vm-strip-reply-headers nil
 vm-stunnel-program "stunnel"
 vm-stunnel-program-additional-configuration-file nil
 vm-stunnel-program-switches nil
 vm-stunnel-random-data-method 'generate
 vm-subject-ignored-prefix "^\\(re: *\\)+"
 vm-subject-ignored-suffix "\\( (fwd)\\| \\)+$"
 vm-subject-significant-chars nil
 vm-summary-arrow "->"
 vm-summary-attachment-indicator "$"
 vm-summary-attachment-label "$"
 vm-summary-attachment-mime-type-exceptions nil
 vm-summary-attachment-mime-types nil
 vm-summary-format "%n %*%A %-17.17F %-3.3m %2d %4l/%-5c %I\"%s\"\n"
 vm-summary-highlight-face 'bold
 vm-summary-mode-hook '(lambda nil
			(make-local-variable (quote font-lock-defaults))
			(if
			 (or (string-match "Outgoing" (buffer-name))
			  (string-match "Sent" (buffer-name))
			  (string-match "Pending" (buffer-name)))
			 (progn
			  (setq vm-summary-format
			   "%n %*%a %-17.17T %-3.3m %2d %4l/%-5c %I\"%s\"\n")
			  (setq font-lock-defaults
			   (quote (vm-summary-mode-font-lock-keywords-2 t)))
			  )
			 (progn
			  (setq vm-summary-format
			   "%n %*%A %-17.17F %-3.3m %2d %4l/%-5c %I\"%s\"\n")
			  (setq font-lock-defaults
			   (quote (vm-summary-mode-font-lock-keywords-1 t)))
			  )
			 )
			(font-lock-fontify-buffer))
 vm-summary-mode-hooks nil
 vm-summary-pointer-update-hook '(lambda nil
				  (make-local-variable
				   (quote font-lock-defaults))
				  (if
				   (or (string-match "Outgoing" (buffer-name))
				    (string-match "Sent" (buffer-name))
				    (string-match "Pending" (buffer-name)))
				   (progn
				    (setq vm-summary-format
				     "%n %*%a %-17.17T %-3.3m %2d %4l/%-5c %I\"%s\"\n")
				    (setq font-lock-defaults
				     (quote
				      (vm-summary-mode-font-lock-keywords-2 t))
				     )
				    )
				   (progn
				    (setq vm-summary-format
				     "%n %*%A %-17.17F %-3.3m %2d %4l/%-5c %I\"%s\"\n")
				    (setq font-lock-defaults
				     (quote
				      (vm-summary-mode-font-lock-keywords-1 t))
				     )
				    )
				   )
				  (font-lock-fontify-block))
 vm-summary-postponed-indicator "P"
 vm-summary-redo-hook '(lambda nil
			(make-local-variable (quote font-lock-defaults))
			(if
			 (or (string-match "Outgoing" (buffer-name))
			  (string-match "Sent" (buffer-name))
			  (string-match "Pending" (buffer-name)))
			 (progn
			  (setq vm-summary-format
			   "%n %*%a %-17.17T %-3.3m %2d %4l/%-5c %I\"%s\"\n")
			  (setq font-lock-defaults
			   (quote (vm-summary-mode-font-lock-keywords-2 t)))
			  )
			 (progn
			  (setq vm-summary-format
			   "%n %*%A %-17.17F %-3.3m %2d %4l/%-5c %I\"%s\"\n")
			  (setq font-lock-defaults
			   (quote (vm-summary-mode-font-lock-keywords-1 t)))
			  )
			 )
			(font-lock-fontify-buffer))
 vm-summary-show-threads nil
 vm-summary-thread-indent-level 2
 vm-summary-uninteresting-senders nil
 vm-summary-uninteresting-senders-arrow "To: "
 vm-summary-update-hook '(lambda nil
			  (make-local-variable (quote font-lock-defaults))
			  (if
			   (or (string-match "Outgoing" (buffer-name))
			    (string-match "Sent" (buffer-name))
			    (string-match "Pending" (buffer-name)))
			   (progn
			    (setq vm-summary-format
			     "%n %*%a %-17.17T %-3.3m %2d %4l/%-5c %I\"%s\"\n")
			    (setq font-lock-defaults
			     (quote (vm-summary-mode-font-lock-keywords-2 t)))
			    )
			   (progn
			    (setq vm-summary-format
			     "%n %*%A %-17.17F %-3.3m %2d %4l/%-5c %I\"%s\"\n")
			    (setq font-lock-defaults
			     (quote (vm-summary-mode-font-lock-keywords-1 t)))
			    )
			   )
			  (font-lock-fontify-buffer))
 vm-tale-is-an-idiot nil
 vm-temp-file-directory "/d/www/users/dafr/.vm-temp"
 vm-thread-using-subject t
 vm-toolbar nil
 vm-toolbar-height nil
 vm-toolbar-orientation 'top
 vm-toolbar-pixmap-directory nil
 vm-trust-From_-with-Content-Length nil
 vm-uncompface-program nil
 vm-undisplay-buffer-hook nil
 vm-unforwarded-header-regexp nil
 vm-url-browser 'vm-mouse-send-url-to-netscape
 vm-url-browser-switches nil
 vm-url-retrieval-methods '(lynx wget fetch curl w3m)
 vm-url-search-limit 12000
 vm-use-lucid-highlighting nil
 vm-use-menus '(folder motion send mark label sort virtual undo dispose emacs
		nil help)
 vm-use-toolbar '(getmail next previous delete/undelete autofile file reply
		  followup forward compose print visit quit help)
 vm-vcard-filter nil
 vm-vcard-format-function nil
 vm-virtual-auto-delete-message-expunge nil
 vm-virtual-auto-delete-message-folder nil
 vm-virtual-auto-delete-message-selector "spam"
 vm-virtual-auto-folder-alist nil
 vm-virtual-check-case-fold-search t
 vm-virtual-check-diagnostics nil
 vm-virtual-folder-alist nil
 vm-virtual-mirror t
 vm-virtual-mode-hook nil
 vm-visible-headers '("Resent-" "From:" "Sender:" "To:" "Apparently-To:" "Cc:"
		      "Subject:" "Date:")
 vm-visit-folder-hook nil
 vm-visit-when-saving 0
 vm-vs-attachment-regexp "^Content-Disposition: attachment"
 vm-vs-spam-score-headers '(("X-Spam-Score:" "[-+]?[0-9]*\\.?[0-9]+"
			     string-to-number)
			    ("X-Spam-Status:" "[-+]?[0-9]*\\.?[0-9]+"
			     string-to-number)
			    ("X-Spam-Level:" "\\*+" length))
 vm-w3m-display-inline-images t
 vm-w3m-program "w3m"
 vm-w3m-safe-url-regexp "\\`cid:"
 vm-w3m-use-w3m-minor-mode-map t
 vm-warp-mouse-to-new-frame nil
 vm-wget-program "wget"
 vm-window-configuration-file "~/.vm.windows"
 vm-zero-drafts-start-compose nil
 )