diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2013-11-25 16:17:34 +0100 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2013-11-25 16:18:34 +0100 |
commit | dacaf62d29be54d020bdc8b73cfcab214a80b0be (patch) | |
tree | 10b4b4fa01920521f7e142c2de7ad836bedcddb8 /helm-semantic.el | |
parent | 559becc5a0bd5f4a5c00e3562a46546463034b7c (diff) |
* helm-semantic.el (helm-semantic-default-action): Fix setting tag on parent.
* helm-files.el: replace a cl-dolist by cl-loop.
* helm-misc.el: same.
Diffstat (limited to 'helm-semantic.el')
-rw-r--r-- | helm-semantic.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/helm-semantic.el b/helm-semantic.el index 94af1965..54f0343a 100644 --- a/helm-semantic.el +++ b/helm-semantic.el @@ -59,8 +59,9 @@ ;; Fix this. (helm-log-run-hook 'helm-goto-line-before-hook) (with-current-buffer helm-buffer - (goto-char (next-single-property-change - (point-at-bol) 'semantic-tag nil (point-at-eol))) + (when (looking-at " ") + (goto-char (next-single-property-change + (point-at-bol) 'semantic-tag nil (point-at-eol)))) (let ((tag (get-text-property (point) 'semantic-tag))) (semantic-go-to-tag tag)))) |