;;; Code:
-(require 'easymenu)
(eval-when-compile (require 'cl))
+(require 'mm-util) ; for mm-universal-coding-system
(defvar gnus-score-mode-hook nil
"*Hook run in score mode buffers.")
table)
"Syntax table used in score-mode buffers.")
-(defvar score-mode-coding-system 'binary)
+;; We need this to cope with non-ASCII scoring.
+(defvar score-mode-coding-system mm-universal-coding-system)
;;;###autoload
(defun gnus-score-mode ()