gwh/slackbuilds
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Indicate deleted and renamed files.

Browse source
This commit is contained in:
Marius Vollmer 2008-09-07 05:25:35 +03:00
parent a379bb1e0f
commit e5ec239c31
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
magit.el
View file

@ -856,12 +856,17 @@ Please see the manual for a complete description of Magit.
(goto-char (match-beginning 0))
(goto-char (point-max)))
(point-marker))))
;; XXX - figure out real status and propertize
(magit-set-section-info file)
(let ((status (cond
((save-excursion
(search-forward-regexp "^new" end t))
"New ")
((save-excursion
(search-forward-regexp "^deleted" end t))
"Deleted ")
((save-excursion
(search-forward-regexp "^rename" end t))
"Renamed ")
(t
"Modified"))))
(insert "\t" status " " file "\n")