.emacs-my
changeset 960 272a40dfdbcd
parent 959 7a7f56a178c3
child 961 d8f1ed2f2f9c
--- a/.emacs-my	Tue Oct 16 09:48:17 2012 +0300
+++ b/.emacs-my	Tue Oct 16 13:27:28 2012 +0300
@@ -954,6 +954,25 @@
   )
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "netbeans")
+
+(defun netbeans-find-command ()
+  "Search for NetBeans executable."
+  (executable-find "netbeans")
+  "/opt/netbeans-7.2/bin/netbeans")
+(defvar netbeans-command (find-netbeans-command)
+  "Command to run NetBeans.")
+(defun netbeans-open-file (file &optional line)
+  "Open FILE on LINE in NetBeans."
+  (if (integerp line)
+      (start-process "netbeans" nil netbeans-command "--open" (format "%s:%d" file line))
+    (start-process "netbeans" nil netbeans-command "--open" file)))
+(defun netbeans-open-this-buffer ()
+  "Open file for burrent buffer in NetBeans."
+  (interactive)
+  (netbeans-open-file (buffer-file-name) (line-number-at-pos)))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "calendar")
 
 ;; (setq mark-holidays-in-calendar t)