22 lines
610 B
EmacsLisp
22 lines
610 B
EmacsLisp
;;; lang/rust/autoload.el -*- lexical-binding: t; -*-
|
|
|
|
;; TODO (defun +rust/run-cargo () (interactive))
|
|
|
|
;;;###autoload
|
|
(defun +rust-cargo-project-p ()
|
|
"Return t if this is a cargo project."
|
|
(locate-dominating-file buffer-file-name "Cargo.toml"))
|
|
|
|
;;;###autoload
|
|
(defun +rust-cargo-compile (command)
|
|
"TODO"
|
|
(let ((default-directory (+rust-cargo-project-p)))
|
|
(compile command)))
|
|
|
|
;;;###autoload
|
|
(defun +rust-racer-lookup-documentation (identifier)
|
|
"A `+lookup/documentation' handler for Rust + Racer."
|
|
(let ((buf (racer--describe identifier)))
|
|
(when buf
|
|
(pop-to-buffer buf)
|
|
t)))
|