>From 8bfc951308324de8e455128950193c046691f1f8 Mon Sep 17 00:00:00 2001 From: Alex Branham Date: Wed, 14 Jun 2017 14:06:18 +0200 Subject: [PATCH] protocol: allow user to disable warning about old style links --- lisp/org-protocol.el | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/lisp/org-protocol.el b/lisp/org-protocol.el index 825435674..2eb1094e9 100644 --- a/lisp/org-protocol.el +++ b/lisp/org-protocol.el @@ -271,6 +271,12 @@ This should be a single regexp string." :package-version '(Org . "8.0") :type 'string) +(defcustom org-protocol-warn-about-old-links t + "If non-nil (the default), issue a warning when org protocol +receives old style links." + :group 'org-protocol + :type 'boolean) + ;;; Helper functions: (defun org-protocol-sanitize-uri (uri) @@ -618,8 +624,9 @@ CLIENT is ignored." (if new-style (funcall func (org-protocol-parse-parameters result new-style)) - (warn "Please update your Org Protocol handler \ -to deal with new-style links.") + (when org-protocol-warn-about-old-links + (warn "Please update your Org Protocol handler \ +to deal with new-style links.")) (funcall func result)))) ;; Greedy protocol handlers are responsible for ;; parsing their own filenames. -- 2.13.1