org-compat: Silence byte-compiler
This commit is contained in:
parent
d66721f6b0
commit
b5403dda35
|
@ -32,9 +32,16 @@
|
|||
(require 'cl-lib)
|
||||
(require 'org-macs)
|
||||
|
||||
(declare-function org-at-table.el-p "org" (&optional table-type))
|
||||
(declare-function org-link-set-parameters "org" (type &rest rest))
|
||||
(declare-function org-table-end (&optional table-type))
|
||||
(declare-function table--at-cell-p "table" (position &optional object at-column))
|
||||
|
||||
(defvar org-table-any-border-regexp)
|
||||
(defvar org-table-dataline-regexp)
|
||||
(defvar org-table-tab-recognizes-table.el)
|
||||
(defvar org-table1-hline-regexp)
|
||||
|
||||
;; As of Emacs 25.1, `outline-mode' functions are under the 'outline-'
|
||||
;; prefix, `find-tag' is replaced with `xref-find-definition' and
|
||||
;; `x-get-selection' with `gui-get-selection'.
|
||||
|
@ -304,7 +311,8 @@ See `org-link-parameters' for documentation on the other parameters."
|
|||
|
||||
(defun org-get-x-clipboard (value)
|
||||
"Get the value of the X or Windows clipboard."
|
||||
(cond ((eq window-system 'x)
|
||||
(cond ((and (eq window-system 'x)
|
||||
(fboundp 'gui-get-selection)) ;Silence byte-compiler.
|
||||
(org-no-properties
|
||||
(ignore-errors
|
||||
(or (gui-get-selection value 'UTF8_STRING)
|
||||
|
|
Loading…
Reference in New Issue