[elpa] master 3699897 26/90: counsel.el (counsel-symbol-at-point): Improve

[Oleh Krehel]

branch: master
commit 369989747f311446a9c40f9f0e6bdc734e9dcf39
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>

    counsel.el (counsel-symbol-at-point): Improve
    
    Fixes #137
---
 counsel.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/counsel.el b/counsel.el
index d1303ba..16c6cf9 100644
--- a/counsel.el
+++ b/counsel.el
@@ -84,7 +84,7 @@
   "Return current symbol at point as a string."
   (let ((s (thing-at-point 'symbol)))
     (and (stringp s)
-         (if (string-match "\\'\\(.*\\)'\\'" s)
+         (if (string-match "\\`[`']?\\(.*\\)'?\\'" s)
              (match-string 1 s)
            s))))