ryuslash/gitto
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Checkdoc-suggested changes

Browse source
This commit is contained in:
Tom Willemsen 2012-10-17 23:48:13 +02:00
parent 944001ce94
commit 86c81c89ab
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
emacs/gitto.el
View file

@ -21,10 +21,10 @@
;;; Commentary:
;; Small interface between gitto and emacs.
;; Small interface between gitto and Emacs.
;; Right now it only offers the `gitto-register' command which lets
;; you register repositories from within emacs. When called
;; you register repositories from within Emacs. When called
;; interactively this command will try to register the git directory
;; of the file of the current buffer.
@ -51,7 +51,7 @@
"Register DIR with gitto."
(interactive (list (locate-dominating-file (buffer-file-name) ".git")))
(unless dir
(error "Not a git repository."))
(error "Not a git repository"))
(shell-command (concat gitto-program " -r " dir)))
@ -60,7 +60,7 @@
"Unregister DIR with gitto."
(interactive (list (locate-dominating-file (buffer-file-name) ".git")))
(unless (and dir (gitto-registered-p dir))
(error "Not a registered git repository."))
(error "Not a registered git repository"))
(shell-command (concat gitto-program " -R " dir)))