;;; module-projectile.el --- project management
;;;
;;; Commentary:
;;;
;;; The de facto standard for Emacs projects.
;;;
;;; Code:

(require 'module-pkg)
(pkg/require 'projectile)

(projectile-mode +1)

(defun open-terminal-at-project-root ()
  "Open an external terminal emulator at the project root directory."
  (interactive)
  (let* ((project-root (projectile-project-root))
         (terminal-program "xterm")
         (command (concat terminal-program " -e 'cd " project-root " && $SHELL'")))
    (if project-root
        (start-process-shell-command "external-terminal" nil command)
      (message "Not in a project"))))

(provide 'module-projectile)

;;; module-projectile.el ends here.