Fix compiler warnings.
This commit is contained in:
parent
4ef3304ac2
commit
fc717f3eb7
|
@ -79,6 +79,7 @@
|
|||
(declare-function org-list-struct "org-list" ())
|
||||
(declare-function org-list-prevs-alist "org-list" (struct))
|
||||
(declare-function org-list-get-list-end "org-list" (item struct prevs))
|
||||
(declare-function org-strip-protective-commas "org" (beg end))
|
||||
|
||||
(defgroup org-babel nil
|
||||
"Code block evaluation and management in `org-mode' documents."
|
||||
|
|
|
@ -6191,6 +6191,7 @@ When this is the global TODO list, a prefix argument will be interpreted."
|
|||
|
||||
(defvar org-global-tags-completion-table nil)
|
||||
(defvar org-agenda-filter-form nil)
|
||||
(defvar org-agenda-filtered-by-category nil)
|
||||
|
||||
(defun org-agenda-filter-by-category (strip)
|
||||
"Keep only those lines in the agenda buffer that have a specific category.
|
||||
|
@ -6369,7 +6370,6 @@ If the line does not have an effort defined, return nil."
|
|||
(funcall op (or eff (if org-sort-agenda-noeffort-is-high 32767 0))
|
||||
value))))
|
||||
|
||||
(defvar org-agenda-filtered-by-category nil)
|
||||
(defun org-agenda-filter-apply (filter type)
|
||||
"Set FILTER as the new agenda filter and apply it."
|
||||
(let (tags)
|
||||
|
|
|
@ -45,7 +45,7 @@
|
|||
(if (get-buffer eshell-buffer-name)
|
||||
(org-pop-to-buffer-same-window eshell-buffer-name)
|
||||
(eshell))
|
||||
(end-of-buffer)
|
||||
(goto-char (point-max))
|
||||
(eshell-kill-input)
|
||||
(insert command)
|
||||
(eshell-send-input)))
|
||||
|
|
|
@ -58,6 +58,7 @@
|
|||
(declare-function org-show-context "org" (&optional key))
|
||||
(declare-function org-trim "org" (s))
|
||||
(declare-function outline-next-heading "outline")
|
||||
(declare-function org-skip-whitespace "org" ())
|
||||
|
||||
(defvar org-outline-regexp-bol) ; defined in org.el
|
||||
(defvar org-odd-levels-only) ; defined in org.el
|
||||
|
|
|
@ -303,7 +303,7 @@ create all custom agenda views, for upload to the mobile phone."
|
|||
(interactive)
|
||||
(let ((a-buffer (get-buffer org-agenda-buffer-name)))
|
||||
(let ((org-agenda-buffer-name "*SUMO*")
|
||||
(org-agenda-filter org-agenda-filter)
|
||||
(org-agenda-tag-filter org-agenda-tag-filter)
|
||||
(org-agenda-redo-command org-agenda-redo-command))
|
||||
(save-excursion
|
||||
(save-window-excursion
|
||||
|
|
|
@ -43,6 +43,8 @@
|
|||
(declare-function org-switch-to-buffer-other-window "org" (&rest args))
|
||||
(declare-function org-pop-to-buffer-same-window
|
||||
"org-compat" (&optional buffer-or-name norecord label))
|
||||
(declare-function org-strip-protective-commas "org" (beg end))
|
||||
(declare-function org-base-buffer "org" (buffer))
|
||||
|
||||
(defcustom org-edit-src-region-extra nil
|
||||
"Additional regexps to identify regions for editing with `org-edit-src-code'.
|
||||
|
|
Loading…
Reference in New Issue