(let ((functions
(cond
((featurep 'xemacs)
- nil)
+ '(frame-char-height frame-char-width))
((>= emacs-major-version 21)
'(function-max-args smiley-encode-buffer))
((boundp 'MULE)
- '(coding-system-get
- coding-system-list coding-system-to-mime-charset compose-mail
- file-name-extension find-coding-systems-for-charsets
+ '(charsetp
+ coding-system-get coding-system-list coding-system-to-mime-charset
+ compose-mail file-name-extension find-coding-systems-for-charsets
find-coding-systems-region function-max-args get-charset-property
smiley-encode-buffer smtpmail-send-it))
(t
(variables
(cond
((featurep 'xemacs)
- nil)
+ '(font-lock-defaults))
((>= emacs-major-version 21)
nil)
((boundp 'MULE)
- nil)
+ '(adaptive-fill-first-line-regexp
+ default-enable-multibyte-characters enable-multibyte-characters))
(t
nil)))
(common-vars