diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2019-08-11 08:02:28 +0200 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2019-08-11 08:02:28 +0200 |
commit | b3ca0c03188afd173c7f8c6bb51a5aa0457e10c3 (patch) | |
tree | b87a348e6f4aeaed587a77e414340187b9691470 | |
parent | dde90de5c5408e22503f23ed0310f3277f4f6014 (diff) |
Remove remaining helm-org* stuff
-rw-r--r-- | helm-easymenu.el | 3 | ||||
-rw-r--r-- | helm-help.el | 66 | ||||
-rw-r--r-- | helm-mode.el | 2 |
3 files changed, 5 insertions, 66 deletions
diff --git a/helm-easymenu.el b/helm-easymenu.el index 44c95a14..eb6878ba 100644 --- a/helm-easymenu.el +++ b/helm-easymenu.el @@ -44,9 +44,6 @@ ["Emacs Manual index" helm-info-emacs t] ["Gnus Manual index" helm-info-gnus t] ["Helm documentation" helm-documentation t]) - ("Org" - ["Org headlines in org agenda files" helm-org-agenda-files-headings t] - ["Org headlines in buffer" helm-org-in-buffer-headings t]) ("Elpa" ["Elisp packages" helm-list-elisp-packages t] ["Elisp packages no fetch" helm-list-elisp-packages-no-fetch t]) diff --git a/helm-help.el b/helm-help.el index 16b56735..2c785f03 100644 --- a/helm-help.el +++ b/helm-help.el @@ -18,9 +18,6 @@ ;;; Code: (require 'helm) -(defvar helm-org-headings--nofilename) -(declare-function helm-source-org-headings-for-files "helm-org.el") - (defgroup helm-help nil "Embedded help for `helm'." @@ -61,8 +58,9 @@ With a prefix arg refresh the documentation. Find here the documentation of all documented sources." (interactive) - (require 'helm-org) - (with-current-buffer (get-buffer-create helm-documentation-buffer-name) + (let ((buf (get-buffer-create helm-documentation-buffer-name))) + (switch-to-buffer buf) + (set-buffer buf) (let ((inhibit-read-only t)) (erase-buffer) (cl-loop for elm in helm-help--string-list @@ -70,12 +68,8 @@ Find here the documentation of all documented sources." do (insert (substitute-command-keys str) "\n\n")) (org-mode)) (setq buffer-read-only t) - (view-mode)) - (let ((helm-org-headings--nofilename t)) - (helm :sources (helm-source-org-headings-for-files - (list (get-buffer helm-documentation-buffer-name))) - :candidate-number-limit 99999 - :buffer "*helm doc*"))) + (view-mode))) + ;;; Local help messages. @@ -1709,56 +1703,6 @@ by using a prefix argument, i.e. `C-u RET', like the regular `yank' command does \\[helm-kill-ring-toggle-truncated]\t\tToggle truncated view of candidate. \\[helm-kill-ring-kill-selection]\t\tKill non-truncated of selection.") -;;; Org headings -;; -;; -(defvar helm-org-headings-help-message - "* Helm Org headings - -** Tips - -*** Refiling - -You can refile one or more headings at a time. - -To refile one heading, move the point to the entry you want to refile and run -\\[helm-org-in-buffer-headings]. Then select the heading you want to refile to -and press \\<helm-org-headings-map>\\[helm-org-run-refile-heading-to] or select the refile action from the actions menu. - -To refile multiple headings, run \\[helm-org-in-buffer-headings] and mark the -headings you want to refile. Then select the heading you want to refile to -\(without marking it) and press \\<helm-org-headings-map>\\[helm-org-run-refile-heading-to] or select the refile action from the -actions menu. - -*** Tags completion - -Tags completion use `completing-read-multiple', perhaps have a -look at its docstring. - -**** Single tag - -From an org heading hit C-c C-c which provide a -\"Tags\" prompt, then hit TAB and RET if you want to enter an -existing tag or write a new tag in prompt. At this point you end -up with an entry in your prompt, if you enter RET, the entry is -added as tag in your org header. - -**** Multiple tags - -If you want to add more tag to your org header, add a separator[1] after -your tag and write a new tag or hit TAB to find another existing -tag, and so on until you have all the tags you want -e.g \"foo,bar,baz\" then press RET to finally add the tags to your -org header. -Note: [1] A separator can be a comma, a colon i.e. [,:] or a space. - -** Commands -\\<helm-org-headings-map> -\\[helm-org-run-open-heading-in-indirect-buffer]\t\tOpen heading in indirect buffer. -\\[helm-org-run-refile-heading-to]\t\tRefile current or marked headings to selection. -\\[helm-org-run-insert-link-to-heading-at-marker]\t\tInsert link at point to selection." - ) - ;;; Completing-read ;; (defun helm-comp-read-help-message () diff --git a/helm-mode.el b/helm-mode.el index c97827cb..fd91aa72 100644 --- a/helm-mode.el +++ b/helm-mode.el @@ -41,8 +41,6 @@ (trace-function-foreground . helm-completing-read-symbols) (trace-function-background . helm-completing-read-symbols) (find-tag . helm-completing-read-default-find-tag) - (org-capture . helm-org-completing-read-tags) - (org-set-tags . helm-org-completing-read-tags) (ffap-alternate-file . nil) (tmm-menubar . nil) (find-file . nil) |