summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThierry Volpiatto <thierry.volpiatto@gmail.com>2019-08-11 08:02:28 +0200
committerThierry Volpiatto <thierry.volpiatto@gmail.com>2019-08-11 08:02:28 +0200
commitb3ca0c03188afd173c7f8c6bb51a5aa0457e10c3 (patch)
treeb87a348e6f4aeaed587a77e414340187b9691470
parentdde90de5c5408e22503f23ed0310f3277f4f6014 (diff)
Remove remaining helm-org* stuff
-rw-r--r--helm-easymenu.el3
-rw-r--r--helm-help.el66
-rw-r--r--helm-mode.el2
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)