Skip to content

Commit

Permalink
gh-177 updating changes to ede
Browse files Browse the repository at this point in the history
  • Loading branch information
Matthew O. Smith committed Jun 26, 2015
1 parent 4e988c0 commit c61f92b
Show file tree
Hide file tree
Showing 4 changed files with 14 additions and 11 deletions.
2 changes: 1 addition & 1 deletion src/main/lisp/malabar-ede-gradle.el
Original file line number Diff line number Diff line change
Expand Up @@ -206,7 +206,7 @@
:name "MALABAR GRADLE"
:file 'ede/gradle
:proj-file "build.gradle"
:proj-root 'ede-maven2-project-root
;:proj-root 'ede-maven2-project-root
:load-type 'malabar-gradle-load
:class-sym 'ede-malabar-gradle-project
:new-p nil
Expand Down
10 changes: 5 additions & 5 deletions src/main/lisp/malabar-ede-maven.el
Original file line number Diff line number Diff line change
Expand Up @@ -205,12 +205,12 @@
(ede-project-autoload "malabar-maven2"
:name "MALABAR MAVEN2"
:file 'ede/maven2
:proj-file "pom.xml"
;:proj-file "pom.xml"
;:proj-root 'ede-maven2-project-root
:load-type 'malabar-maven2-load
:class-sym 'ede-malabar-maven2-project
:new-p nil
:safe-p t
;:load-type 'malabar-maven2-load
;:class-sym 'ede-malabar-maven2-project
;:new-p nil
;:safe-p t
)
'unique)

Expand Down
9 changes: 6 additions & 3 deletions src/main/lisp/malabar-mode.el
Original file line number Diff line number Diff line change
Expand Up @@ -626,7 +626,8 @@ install locations in addition to the directories in
(let* ((jdk-alist (malabar-jdk-installed-jvms))
(port (+ 49152 (random (- 65535 49152))))
(jdk-home (cadr (assoc jdk jdk-alist)))
(cwd (ede-find-project-root "pom.xml"))
(project-instance (ede-current-project))
(cwd (oref project-instance file))
(rtnval (malabar-http-call "spawn"
(list
"pm" "maven" ;; just a place holder
Expand Down Expand Up @@ -1709,10 +1710,12 @@ current buffer. Also set the server logging level to FINEST. See the *groovy*
(ede-minor-mode)
(easy-menu-add-item nil '("Development") malabar-mode-menu-map "JVM")

(let ((project-dir (ede-find-project-root "pom.xml")))
(let* ((project-instance (ede-current-project))
(project-file (oref project-instance file))
(project-dir (file-name-directory project-file)))
(setq malabar-mode-project-dir project-dir )
(setq malabar-mode-project-manager "maven" )
(setq malabar-mode-project-file (format "%spom.xml" project-dir ))
(setq malabar-mode-project-file project-file)
(setq malabar-mode-project-name (file-name-nondirectory (directory-file-name project-dir))))

(malabar-post-additional-classpath)
Expand Down
4 changes: 2 additions & 2 deletions src/main/lisp/malabar-project.el
Original file line number Diff line number Diff line change
Expand Up @@ -146,8 +146,8 @@

(defun malabar--project-file (dir)
"Return the directory containing the project file"
(ede-find-project-root "pom.xml" dir))
(let ((project-instance (ede-current-project)))
(oref project-instance file)))


(defun malabar-project-populate-buffer-locals (&optional dir buffer)
Expand Down

0 comments on commit c61f92b

Please sign in to comment.