gnus/tm-gnus.el

   1 ;;;
   2 ;;; tm-gnus.el --- MIME extension for GNUS
   3 ;;;
   4 ;;; Copyright (C) 1995 Free Software Foundation, Inc.
   5 ;;; Copyright (C) 1993,1994,1995 MORIOKA Tomohiko
   6 ;;;
   7 ;;; Author: Morioka Tomohiko <morioka@jaist.ac.jp>
   8 ;;; Version:
   9 ;;;     $Id: tm-gnus.el,v 6.5 1995/09/28 02:20:46 morioka Exp $
  10 ;;; Keywords: news, MIME, multimedia, encoded-word, multilingual
  11 ;;;
  12 ;;; This file is part of tm (Tools for MIME).
  13 ;;;
  14
  15 (require 'gnus)
  16
  17
  18 ;;; @ variables
  19 ;;;
  20
  21 (defvar tm-gnus/startup-hook nil)
  22
  23
  24 ;;; @ set up
  25 ;;;
  26
  27 (cond ((boundp 'gnus-original-article-buffer)
  28        (require 'tm-sgnus)
  29        )
  30       ((string-match "^\\(Gnus v5\\|September Gnus\\)" gnus-version)
  31        (require 'tm-gnus5)
  32        )
  33       ((string-match "(ding)" gnus-version)
  34        (require 'tm-dgnus)
  35        )
  36       ((string-match "^GNUS 4" gnus-version)
  37        (require 'tm-gnus4)
  38        )
  39       ((string-match "^GNUS [0-3]" gnus-version)
  40        (require 'tm-gnus3)
  41        ))
  42
  43
  44 ;;; @ end
  45 ;;;
  46
  47 (provide 'tm-gnus)
  48
  49 (run-hooks 'tm-gnus/startup-hook)