.emacs-my
changeset 1528 81091a6d400a
parent 1527 ff6e296d2b21
child 1529 37b616faabb8
equal deleted inserted replaced
1527:ff6e296d2b21 1528:81091a6d400a
  1384         (start-process ide-netbeans-process-bufname nil ide-netbeans-program "--open" (format "%s:%d" fname line))
  1384         (start-process ide-netbeans-process-bufname nil ide-netbeans-program "--open" (format "%s:%d" fname line))
  1385       (start-process ide-netbeans-process-bufname nil ide-netbeans-program "--open" fname))))
  1385       (start-process ide-netbeans-process-bufname nil ide-netbeans-program "--open" fname))))
  1386 (defun ide-netbeans-open-this-buffer ()
  1386 (defun ide-netbeans-open-this-buffer ()
  1387   "Open current buffer in NetBeans."
  1387   "Open current buffer in NetBeans."
  1388   (interactive)
  1388   (interactive)
  1389   (unless (stringp (buffer-file-name))
  1389   (unless (and (stringp (buffer-file-name)) (file-regular-p (buffer-file-name)))
  1390     (error "Buffer have no association with a file"))
  1390     (error "Buffer have no association with a file"))
  1391   (if (file-regular-p (buffer-file-name))
  1391   (ide-netbeans-open-file (buffer-file-name) (line-number-at-pos)))
  1392       (ide-netbeans-open-file (buffer-file-name) (line-number-at-pos))
       
  1393     (message "Current buffer wasnt' associated with a real file")))
       
  1394 
  1392 
  1395 (defvar ide-idea-program nil
  1393 (defvar ide-idea-program nil
  1396   "Idea executable or full path, like 'idea64.exe'")
  1394   "Idea executable or full path, like 'idea64.exe'")
  1397 
  1395 
  1398 (defconst ide-idea-process-bufname "*ide-idea*"
  1396 (defconst ide-idea-process-bufname "*ide-idea*"
  1406         (start-process ide-idea-process-bufname nil ide-idea-program "--line" (int-to-string line) fname)
  1404         (start-process ide-idea-process-bufname nil ide-idea-program "--line" (int-to-string line) fname)
  1407       (start-process ide-idea-process-bufname nil ide-idea-program fname))))
  1405       (start-process ide-idea-process-bufname nil ide-idea-program fname))))
  1408 (defun ide-idea-open-this-buffer ()
  1406 (defun ide-idea-open-this-buffer ()
  1409   "Open current buffer in Intellij Idea."
  1407   "Open current buffer in Intellij Idea."
  1410   (interactive)
  1408   (interactive)
  1411   (unless (stringp (buffer-file-name))
  1409   (unless (and (stringp (buffer-file-name) (file-regular-p (buffer-file-name))))
  1412     (error "Buffer have no association with a file"))
  1410     (error "Buffer have no association with a file"))
  1413   (unless (file-regular-p (buffer-file-name))
       
  1414     (error "Current buffer isn't associated with a real file"))
       
  1415   (ide-idea-open-file (buffer-file-name) (line-number-at-pos)))
  1411   (ide-idea-open-file (buffer-file-name) (line-number-at-pos)))
       
  1412 
       
  1413 (define-key global-map [s-n] 'ide-netbeans-open-this-buffer)
       
  1414 (define-key global-map [s-i] 'ide-idea-open-this-buffer)
  1416 
  1415 
  1417 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1416 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1418 (message "calendar")
  1417 (message "calendar")
  1419 
  1418 
  1420 (eval-when 'compile (require 'calendar))
  1419 (eval-when 'compile (require 'calendar))