;ELC   
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.


(defconst mh-temp-buffer " *mh-temp*")
(defconst mh-temp-checksum-buffer " *mh-checksum*")
(defconst mh-temp-fetch-buffer " *mh-fetch*")
(defconst mh-temp-index-buffer " *mh-index*")
(defconst mh-aliases-buffer "*MH-E Aliases*")
(defconst mh-folders-buffer "*MH-E Folders*")
(defconst mh-help-buffer "*MH-E Help*")
(defconst mh-info-buffer "*MH-E Info*")
(defconst mh-log-buffer "*MH-E Log*")
(defconst mh-mail-delivery-buffer "*MH-E Mail Delivery*")
(defconst mh-recipients-buffer "*MH-E Recipients*")
(defconst mh-sequences-buffer "*MH-E Sequences*")
#@45 Number of lines to keep in `mh-log-buffer'.
(defvar mh-log-buffer-lines 100 (#$ . 637))
#@300 If `mh-log-buffer' is too big then truncate it.
If the number of lines in `mh-log-buffer' exceeds
`mh-log-buffer-lines' then keep only the last
`mh-log-buffer-lines'. As a side effect the point is set to the
end of the log buffer.

The function returns the size of the final size of the log buffer.
(defalias 'mh-truncate-log-buffer #[0 "r\302!q\210db\210\212	[y\303=\203 e`|\210)o\204. \212\304y\303=\205' \305f\306=)\204. \307c\210\310 )\207" [mh-log-buffer mh-log-buffer-lines get-buffer-create 0 -1 nil 12 "\n\f\n" buffer-size] 2 (#$ . 732)])
(provide 'mh-buffers)