.emacs-my
changeset 962 5d94d3736bbe
parent 961 d8f1ed2f2f9c
child 963 102845496d41
equal deleted inserted replaced
961:d8f1ed2f2f9c 962:5d94d3736bbe
   955 
   955 
   956 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   956 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   957 (message "netbeans")
   957 (message "netbeans")
   958 
   958 
   959 (defun netbeans-find-command ()
   959 (defun netbeans-find-command ()
   960   "Search for NetBeans executable."
   960   "Search for NetBeans executable in PATH, later in '/opt/netbeans*/bin/'."
   961   (or
   961   (or
   962    (executable-find "netbeans")
   962    (executable-find "netbeans")
   963    "/opt/netbeans*/bin/netbeans")
   963    (car (last (sort (file-expand-wildcards "/opt/[Nn]etbeans*/bin/netbeans" t) 'equals))) ))
   964 (defvar netbeans-command (netbeans-find-command)
   964 (defvar netbeans-command (netbeans-find-command)
   965   "Command to run NetBeans.")
   965   "Command to run NetBeans.")
   966 (defun netbeans-open-file (file &optional line)
   966 (defun netbeans-open-file (file &optional line)
   967   "Open FILE on LINE in NetBeans."
   967   "Open FILE on LINE in NetBeans."
   968   (if (integerp line)
   968   (if (integerp line)