| Server IP : 217.160.0.212 / Your IP : 216.73.216.141 Web Server : Apache System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/mh-e/ |
Upload File : |
;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)