diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-09-07 17:16:33 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-09-07 18:31:23 +0200 |
| commit | b5403dda35d1d48a9b5b1957a521a610bbaced18 (patch) | |
| tree | b67baec4b3781ec7c39ae1093668b852cbc8cb41 | |
| parent | d66721f6b0d85c69eebeb671dee37c0e3cf05b4c (diff) | |
| download | org-mode-b5403dda35d1d48a9b5b1957a521a610bbaced18.tar.gz | |
org-compat: Silence byte-compiler
| -rw-r--r-- | lisp/org-compat.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/org-compat.el b/lisp/org-compat.el index 6d5ed67..89c6798 100644 --- a/lisp/org-compat.el +++ b/lisp/org-compat.el @@ -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) |