
(defun vm-visit-virtual-folder (folder-name &optional read-only) (interactive (byte-code "Ä ˆÅÆÁÂ$D‡" [vm-virtual-folder-alist nil t current-prefix-arg vm-session-initialization completing-read "Visit virtual folder: "] 6)) (byte-code "ÁˆØ ˆÙ\"?… ÚÛ\"ˆÜPÁÝ!qˆÞ=?‰ˆ…r Þß
	ÂÂpÂÂ‰ˆàp!ˆáâ!ˆãâ!ˆäÙ\"\"ˆå ˆæ!ˆç ˆèp!ˆ?…… ?…… é *‡" [vm-virtual-folder-alist nil t current-prefix-arg folder-name buffer-name first-time major-mode mode-name mode-line-format vm-mode-line-format buffer-read-only vm-folder-read-only read-only truncate-lines vm-current-grouping vm-group-by vm-mail-buffer vm-summary-buffer vm-numbering-redo-start-point vm-summary-redo-start-point vm-mode-map vm-inhibit-startup-message vm-startup-message-displayed vm-session-initialization assoc error "No such virtual folder, %s" " virtual" get-buffer-create vm-virtual-mode "VM Virtual" buffer-flush-undo abbrev-mode 0 auto-fill-mode vm-build-virtual-message-list vm-thoughtfully-select-message use-local-map vm-emit-totals-blurb switch-to-buffer vm-display-startup-message] 15))

(defun vm-build-virtual-message-list (def read-only) (byte-code "	AÃpÃÍÍÍÍÍÍÍ
	Š…Z@@@A‰	ˆ	…QÖ×Ø	@@!P!‰
ˆ	@AƒT 	@A@‰‚X Í‰ˆ…F@‰ˆÙÚ\"‰\"?…{ Íˆ‚e ˆÛ!ƒ– ÜAÝÞÃÍ#!\"‰‚Bß!†¡ à!qˆ>?…¸ BpB‰ˆá=?…Ã á ˆ‰ˆ…;ƒà â
@#‚ç â
@\"…0ã@!B‰ˆƒ@äHå@@äHåHBI‚@æçÍ\"Iˆ@èã@èH!Iˆ@èHèÍIˆA‰ˆ‚Ê ˆA‰ˆ‚Y ˆ	A‰	ˆ‚/ ˆA‰ˆ‚ )ˆé!‰.‡" [clauses def inhibit-local-variables t vbuffer inhibit-quit message-list folders folder selector-list selector arg buffers-used nil vm-folder-directory vm-virtual-buffers major-mode mp vm-message-list vm-virtual-mirror vm-attributes-vector-length vm-real-buffers intern "vm-vs-" symbol-name equal expand-file-name file-directory-p nconc vm-delete-directories directory-files get-file-buffer find-file-noselect vm-mode funcall copy-sequence 0 7 2 make-vector 1 nreverse] 24))

(defun vm-delete-directories (list) (byte-code "ÁÂ\"‡" [list vm-delete file-directory-p] 3))

(defun vm-vs-any (m) (byte-code "À‡" [t] 1))

(defun vm-vs-author (m arg) (byte-code "ÂÃ	!\"† ÂÄ	!\"‡" [arg m string-match vm-su-full-name vm-su-from] 6))

(defun vm-vs-recipient (m arg) (byte-code "ÂÃ	!\"† ÂÄ	!\"‡" [arg m string-match vm-su-to vm-su-to-names] 6))

(defun vm-vs-subject (m arg) (byte-code "ÂÃ	!\"‡" [arg m string-match vm-su-subject] 4))

(defun vm-vs-header (m arg) (byte-code "ŠŒÃ ˆÄHÄHbˆÅ ˆÆ	Ç!Â#))‡" [m arg t widen 0 forward-line re-search-forward vm-text-of] 7))

(defun vm-vs-text (m arg) (byte-code "ŠŒÃ ˆÄ!bˆÅ	Æ!Â#))‡" [m arg t widen vm-text-of re-search-forward vm-text-end-of] 7))

(defun vm-virtual-quit nil (byte-code "Á=…
 ÊË!?ƒ ÌÍ!‚ ÎÏ!ˆpÁŠ
…: 
@qˆÐ\"
A‰ˆ‚\" )ˆ…Y @ÑHÒÐ@@ÑHÒH\"IˆA‰ˆ‚< ˆÓÉ!ˆÔp!,‡" [vm-confirm-quit t bp vm-real-buffers mp vm-message-list b inhibit-quit vm-virtual-buffers nil y-or-n-p "Do you really want to quit? " error "Aborted" message "" delq 0 7 set-buffer-modified-p kill-buffer] 11))
