From c4167ccfba270ab485c743a8a272dfab49f5adbd Mon Sep 17 00:00:00 2001 From: Tassilo Horn Date: Tue, 28 Apr 2009 13:08:18 +0200 Subject: [PATCH] GPL header, defined minor mode --- eclim.el | 43 +++++++++++++++++++++++++++++++++++++++++-- 1 file changed, 41 insertions(+), 2 deletions(-) diff --git a/eclim.el b/eclim.el index a44b54f..de6b031 100644 --- a/eclim.el +++ b/eclim.el @@ -1,3 +1,29 @@ +;; eclim.el --- an interface to the Eclipse IDE. +;; +;; Copyright (C) 2009 Tassilo Horn +;; +;; This program is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. +;; +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. +;; +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . +;; +;;; Contributors +;; +;; - Nikolaj Schumacher +;; +;;; Conventions +;; +;; Conventions used in this file: Name internal variables and functions +;; "eclim--", and name eclim command invocations +;; "eclim/command-name", like eclim/project-list. ;;* Eclim @@ -78,9 +104,22 @@ saved." (mapcar (lambda (line) (nreverse (split-string line " *- *" nil))) (eclim--call-process "project_list"))) +;;** The minor mode and its keymap + +(defvar eclim-mode-map + (let ((map (make-sparse-keymap))) + ) + "The keymap used in `eclim-mode'.") + (define-minor-mode eclim-mode "An interface to the Eclipse IDE." nil "Eclim" - (eclim--project-name) - ) \ No newline at end of file + eclim-mode-map + (if eclim-mode + (progn + ;; Set project dir and name. + (eclim--project-dir) + (eclim--project-name)) + (kill-local-variable 'eclim--project-dir) + (kill-local-variable 'eclim--project-name))) -- 2.11.4.GIT