diff options
| author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2015-03-15 16:45:29 +0100 |
|---|---|---|
| committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2015-03-15 16:45:29 +0100 |
| commit | c1adad3483d61196c45dfd4d3d58423fd262cf86 (patch) | |
| tree | 506ae34e936b75466ca457987859a3e98388b0f9 /helm-info.el | |
| parent | 60f1b33ba5efb88cc7dde4dc6a951709e6749696 (diff) | |
* helm-info.el: Minor fix on comment, also use start and end.
Diffstat (limited to 'helm-info.el')
| -rw-r--r-- | helm-info.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/helm-info.el b/helm-info.el index 6303a47f..2b187deb 100644 --- a/helm-info.el +++ b/helm-info.el @@ -32,7 +32,7 @@ "Info related Applications and libraries for Helm." :group 'helm) -;;; Build info-index sources with info-index plug-in. +;;; Build info-index sources with `helm-info-source' class. ;; ;; (cl-defun helm-info-init (&optional (file (helm-attr 'info-file))) @@ -46,7 +46,7 @@ (let (Info-history (tobuf (helm-candidate-buffer 'global)) (infobuf (current-buffer)) - s e + start end (nodes (or (helm-attr 'index-nodes) (Info-index-nodes)))) (cl-dolist (node nodes) (Info-goto-node node) @@ -55,10 +55,10 @@ (unless (search-forward "Menu:\n" (1+ (point-at-eol)) t) (save-current-buffer (buffer-substring-no-properties (point-at-bol) (point-at-eol))) - (setq s (point-at-bol) - e (point-at-eol)) + (setq start (point-at-bol) + end (point-at-eol)) (with-current-buffer tobuf - (insert-buffer-substring infobuf s e) + (insert-buffer-substring infobuf start end) (insert "\n"))))))))) (defun helm-info-goto (node-line) |