3
;;; $Id: load.scm,v 1.38 2002/02/03 04:37:21 cph Exp $
5
;;; Copyright (c) 1999-2002 Massachusetts Institute of Technology
7
;;; This program is free software; you can redistribute it and/or
8
;;; modify it under the terms of the GNU General Public License as
9
;;; published by the Free Software Foundation; either version 2 of the
10
;;; License, or (at your option) any later version.
12
;;; This program is distributed in the hope that it will be useful,
13
;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
14
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15
;;; General Public License for more details.
17
;;; You should have received a copy of the GNU General Public License
18
;;; along with this program; if not, write to the Free Software
19
;;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
22
;;;; IMAIL mail reader: loader
24
(load-option 'HASH-TABLE)
25
(load-option 'REGULAR-EXPRESSION)
27
(with-working-directory-pathname (directory-pathname (current-load-pathname))
29
(fluid-let ((*allow-package-redefinition?* #t))
30
(load-package-set "imail"))))
31
(add-subsystem-identification! "IMAIL" '(1 18))
b'\\ No newline at end of file'