Is there a common way to open "svn-status" or "magit" depending on current buffers system?

Question

before I sit down and reinvent the wheel for me:

I'm working with svn and git in different projects. Is there already an existing way to start svn-status or magit, depending on the vcs that is used for the file in the current buffer? Maybe some of the vc-* commands?

Thanks, Markus

djangoliv · Accepted Answer · 2017-10-13T10:00:39.270

2

Something like this:

(defun open-status ()
  (interactive)
  (if vc-mode
      (if (string-match "^ Git" (substring-no-properties vc-mode))
          (magit-status)
        (if (string-match "^ SVN" (substring-no-properties vc-mode))
            (call-interactively 'svn-status )
          (if (string-match "^ HG" (substring-no-properties vc-mode))
              (ahg-status)
            )))
    (message "not a project file")))

edited Oct 13 '17 at 10:00

answered Oct 13 '17 at 08:28

djangoliv

3,169
16
31

Perfect, thank you! `(svn-status ".")` didn't match my needs, so I replaced it with `( call-interactively 'svn-status )` and now I have just what I needed :) – Markus Oct 13 '17 at 09:36
True, much better... edit my answer – djangoliv Oct 13 '17 at 10:01

score 1 · Answer 2 · answered Oct 13 '17 at 09:43

1

I came up with something like this.

(defun vc-status ()
  (interactive)
  (let ((backend (vc-responsible-backend default-directory)))
    (cond ((equal 'Git backend) (magit-status))
          ((equal 'Hg backend) (ahg-status)))))

answered Oct 13 '17 at 09:43

Tephra

821
5
14

Nice, getting the backend like this looks a bit "cleaner"... – Markus Oct 16 '17 at 08:31

Is there a common way to open "svn-status" or "magit" depending on current buffers system?

2 Answers2