branch: elpa/aidermacs
commit b0a60a60d4e83cd0c512f05ee17ff175f30f59c7
Merge: 048b3847f4 e3f4d515a0
Author: Matthew Zeng <matthew...@posteo.net>
Commit: GitHub <nore...@github.com>

    Merge pull request #6 from CeleritasCelery/remove_magit
    
    Remove dependency on magit
---
 aidermacs.el | 16 +++++++---------
 1 file changed, 7 insertions(+), 9 deletions(-)

diff --git a/aidermacs.el b/aidermacs.el
index 082ed445a8..143abbac1b 100644
--- a/aidermacs.el
+++ b/aidermacs.el
@@ -3,7 +3,7 @@
 ;; Author: Mingde (Matthew) Zeng <matthew...@posteo.net>
 ;; Original Author: Kang Tu <tni...@gmail.com>
 ;; Version: 0.2.0
-;; Package-Requires: ((emacs "26.1") (transient "0.3.0") (magit "2.1.0"))
+;; Package-Requires: ((emacs "26.1") (transient "0.3.0"))
 ;; Keywords: convenience, tools
 ;; URL: https://github.com/MatthewZMD/aidermacs.el
 
@@ -15,7 +15,7 @@
 (require 'comint)
 (require 'dired)
 (require 'transient)
-(require 'magit)
+(require 'vc-git)
 (require 'which-func)
 (require 'ansi-color)
 
@@ -198,15 +198,13 @@ Affects the system message too.")
 (defun aidermacs-buffer-name ()
   "Generate the aidermacs buffer name based on the git repo or current buffer 
file path.
 If not in a git repository and no buffer file exists, an error is raised."
-  (let ((git-repo-path (magit-toplevel))
+  (let ((git-repo-path (vc-git-root default-directory))
         (current-file (buffer-file-name)))
     (cond
-     ;; Case 1: Valid git repo path (not nil and not containing "fatal")
-     ((and git-repo-path
-           (stringp git-repo-path)
-           (not (string-match-p "fatal" git-repo-path)))
+     ;; Case 1: Valid git repo path
+     (git-repo-path
       (format "*aidermacs:%s*" (file-truename git-repo-path)))
-     ;; Case 2: Has buffer file (handles both nil and "fatal" git-repo-path 
cases)
+     ;; Case 2: Has buffer file
      (current-file
       (format "*aidermacs:%s*"
               (file-truename (file-name-directory current-file))))
@@ -904,7 +902,7 @@ When sending paragraph content, preserve cursor position 
and deactivate mark aft
   "Open aidermacs prompt file under git repo root.
 If file doesn't exist, create it with command binding help and sample prompt."
   (interactive)
-  (let* ((git-root (magit-toplevel))
+  (let* ((git-root (vc-git-root default-directory))
          (prompt-file (when git-root
                         (expand-file-name aidermacs-prompt-file-name 
git-root))))
     (if prompt-file

Reply via email to