From a109a085e1d8f3daef9ce923bbf40d8fec78fdc6 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 2 Jul 1999 13:10:17 +0000 Subject: [PATCH] (gnus-startup-file-coding-system): Use `static-if'. (TopLevel): Require `static'. --- lisp/gnus-start.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index ff75518..8902ab3 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -32,7 +32,9 @@ (require 'gnus-range) (require 'gnus-util) (require 'message) -(eval-when-compile (require 'cl)) +(eval-when-compile + (require 'cl) + (require 'static)) (defcustom gnus-startup-file (nnheader-concat gnus-home-directory ".newsrc") "Your `.newsrc' file. @@ -395,7 +397,7 @@ Can be used to turn version control on or off." :group 'gnus-newsrc :type 'boolean) -(defvar gnus-startup-file-coding-system (if (boundp 'MULE) +(defvar gnus-startup-file-coding-system (static-if (boundp 'MULE) '*ctext* 'ctext) "*Coding system for startup file.") -- 1.7.10.4