This commit was generated by cvs2svn to compensate for changes in r434,

[elisp/tm.git] / sc-setup.el

diff --git a/sc-setup.el b/sc-setup.el
index 18f38a1..4b0b2f5 100644 (file)
--- a/sc-setup.el
+++ b/sc-setup.el
@@ -1,24 +1,21 @@
 ;;;
-;;; $Id: sc-setup.el,v 1.3 1994/08/22 13:56:10 morioka Exp morioka $
+;;; $Id: sc-setup.el,v 3.0 1995/08/26 18:37:34 morioka Exp $
 ;;;
 
-(provide 'sc-setup)
-
-
-;;; @ for Emacs 18
-;;;
-(if (not (fboundp 'add-hook))
-    (require 'tl-18)
-  )
+(require 'emu)
 
 
 ;;; @ for Super Cite
 ;;;
-(if (< (string-to-int emacs-version) 19)
+
+(if (< emacs-major-version 19)
     (autoload 'sc-cite-original "sc" nil t)
   (autoload 'sc-cite-original  "supercite" "supercite 3.1" t)
-  (autoload 'sc-submit-bug-report "supercite" "Supercite 3.1" t))
+  (autoload 'sc-submit-bug-report "supercite" "Supercite 3.1" t)
+  )
+
 (setq sc-citation-leader "")
+
 (cond ((boundp 'MULE)
        ;; for MULE
        (setq sc-cite-regexp "\\s *\\([a-zA-Z0-9]\\|\\cj\\)*>+\\s *")
@@ -28,7 +25,8 @@
        (setq sc-cite-regexp
             "\\s *\\([a-zA-Z0-9]\\|\\cc\\|\\cC\\|\\ch\\|\\cH\\|\\ck\\|\\cK\\)*>+\\s *")
        ))
-(if (< (string-to-int emacs-version) 19)
+
+(if (< emacs-major-version 19)
     (progn
       (defun my-sc-overload-hook ()
        (require 'sc-oloads)
@@ -71,3 +69,9 @@
 ;;             (- (length sc-rewrite-header-list) 1))
 ;;       ))
 (setq sc-preferred-attribution 'registeredname)
+
+
+;;; @ end
+;;;
+
+(provide 'sc-setup)