From: yamaoka <yamaoka>
Date: Fri, 2 Jul 1999 13:11:17 +0000 (+0000)
Subject: (score-mode-coding-system): Use `static-if'.
X-Git-Tag: et-gnus-6_11_04-02~2
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8922c54c2e2cfdedfd0c34e6bcbeee57c00204c6;p=elisp%2Fgnus.git-

(score-mode-coding-system): Use `static-if'.
(TopLevel): Require `static'.
---

diff --git a/lisp/score-mode.el b/lisp/score-mode.el
index 181f982..e1bef9e 100644
--- a/lisp/score-mode.el
+++ b/lisp/score-mode.el
@@ -26,7 +26,9 @@
 ;;; Code:
 
 (require 'easymenu)
-(eval-when-compile (require 'cl))
+(eval-when-compile
+  (require 'cl)
+  (require 'static))
 
 (defvar gnus-score-mode-hook nil
   "*Hook run in score mode buffers.")
@@ -51,7 +53,7 @@
     table)
   "Syntax table used in score-mode buffers.")
 
-(defvar score-mode-coding-system (if (boundp 'MULE)
+(defvar score-mode-coding-system (static-if (boundp 'MULE)
 				     '*ctext*
 				   'ctext))