summaryrefslogtreecommitdiff
path: root/helm-semantic.el
diff options
context:
space:
mode:
authorThierry Volpiatto <thierry.volpiatto@gmail.com>2016-05-30 08:35:19 +0200
committerThierry Volpiatto <thierry.volpiatto@gmail.com>2016-05-30 08:35:19 +0200
commit11fd36f518c629ede636034606599c4e46db136b (patch)
treeda175d183f044ea639c0af7e3842944f2ca64b67 /helm-semantic.el
parent4a899b1754332d2b824ec0bd59f0f3f1dc2d094f (diff)
Use default in semantic-or-imenu.
* helm-semantic.el (helm-semantic-or-imenu): Only when using imenu.
Diffstat (limited to 'helm-semantic.el')
-rw-r--r--helm-semantic.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/helm-semantic.el b/helm-semantic.el
index 3de1c39e..5baa00ae 100644
--- a/helm-semantic.el
+++ b/helm-semantic.el
@@ -198,6 +198,7 @@ Fill in the symbol at point by default."
'helm-source-imenu))
(imenu-p (eq source 'helm-source-imenu))
(imenu-auto-rescan imenu-p)
+ (str (thing-at-point 'symbol))
(helm-execute-action-at-once-if-one
(and imenu-p
helm-imenu-execute-action-at-once-if-one))
@@ -207,9 +208,8 @@ Fill in the symbol at point by default."
(format "\\_<%s\\_>" (car (semantic-current-tag))))))
(helm :sources source
:candidate-number-limit 9999
- :preselect (if (or arg imenu-p)
- (thing-at-point 'symbol)
- tag)
+ :default (and imenu-p (list (concat "\\_<" str "\\_>") str))
+ :preselect (if (or arg imenu-p) str tag)
:buffer "*helm semantic/imenu*")))
(provide 'helm-semantic)