Cleanups, no logic changes.
[elinstall.git] / do-elinstall.el
blob03a18adfab26bd0fb3b4a44cff0477c64faa8332
1 ;;;_ elinstall/do-elinstall.el --- Script to do elinstall installation
3 ;;;_. Headers
4 ;;;_ , License
5 ;; Copyright (C) 2010 Tom Breton (Tehom)
7 ;; Author: Tom Breton (Tehom) <tehom@panix.com>
8 ;; Keywords: maint,convenience
10 ;; This file is free software; you can redistribute it and/or modify
11 ;; it under the terms of the GNU General Public License as published by
12 ;; the Free Software Foundation; either version 2, or (at your option)
13 ;; any later version.
15 ;; This file is distributed in the hope that it will be useful,
16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 ;; GNU General Public License for more details.
20 ;; You should have received a copy of the GNU General Public License
21 ;; along with GNU Emacs; see the file COPYING. If not, write to
22 ;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
23 ;; Boston, MA 02111-1307, USA.
25 ;;;_ , Commentary:
27 ;;
30 ;;;_ , Requires
32 ;;Itself. But it might not be loaded or known to load-path.
33 (let ((load-path '("./")))
34 (require 'elinstall))
36 ;;;_. Body
38 (elinstall
39 "elinstall"
40 (elinstall-directory-true-name)
41 '(dir "./"))
43 ;;;_. Footers
44 ;;;_ , Provides
46 ;;Nothing, this is a script.
48 ;;;_ * Local emacs vars.
49 ;;;_ + Local variables:
50 ;;;_ + mode: allout
51 ;;;_ + no-byte-compile: t
52 ;;;_ + no-update-autoloads: t
53 ;;;_ + End:
55 ;;;_ , End
56 ;;; elinstall/do-elinstall.el ends here