← Back to branch summary

~vm/vm/message

« back to all changes in this revision

Viewing changes to lisp/vm.el

  • Committer: Robert Widhopf-Fenk
  • Date: 2008-01-05 22:23:53 UTC
  • Revision ID: hack@robf.de-20080105222353-vzlz0thglynoed09
Syncing with Mozilla-Status may corrupt folder, thus disable it.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lisp/vm.el
174
174
      (let ((msf (concat (buffer-file-name) ".msf")))
175
175
        (setq vm-sync-thunderbird-status
176
176
              (or (file-exists-p msf)
177
 
                  (re-search-forward "^X-Mozilla-Status2?:"
178
 
                                     (point-max) t))))
 
177
                  ;TODO (re-search-forward "^X-Mozilla-Status2?:"
 
178
                  ;                   (point-max) t)
 
179
                  )))
179
180
      (cond ((memq access-method '(pop imap))
180
181
             (if (not (equal folder-name (buffer-name)))
181
182
                 (rename-buffer folder-name t))))