emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 89a6830 186/348: counsel.el (counsel-at-git-issue-p): Fix


From: Oleh Krehel
Subject: [elpa] master 89a6830 186/348: counsel.el (counsel-at-git-issue-p): Fix for newer magit
Date: Sat, 8 Apr 2017 11:03:52 -0400 (EDT)

branch: master
commit 89a68302ecbf08d07d6a16527a25f40b13706de3
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    counsel.el (counsel-at-git-issue-p): Fix for newer magit
    
    Fixes #692
---
 counsel.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/counsel.el b/counsel.el
index 71502f5..6f2999d 100644
--- a/counsel.el
+++ b/counsel.el
@@ -1360,11 +1360,13 @@ When INITIAL-INPUT is non-nil, use it in the minibuffer 
during completion."
           (file-name-as-directory (file-name-nondirectory dir-file-name)))))
 
 (defun counsel-at-git-issue-p ()
-  "Whe point is at an issue in a Git-versioned file, return the issue string."
+  "When point is at an issue in a Git-versioned file, return the issue string."
   (and (looking-at "#[0-9]+")
        (or
         (eq (vc-backend (buffer-file-name)) 'Git)
-        (memq major-mode '(magit-commit-mode)))
+        (or
+         (memq major-mode '(magit-commit-mode))
+         (bound-and-true-p magit-commit-mode)))
        (match-string-no-properties 0)))
 
 (defun counsel-github-url-p ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]