summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2016-06-23 09:25:33 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2016-06-23 09:25:33 +0200
commitbfed384cd8e6072ddf2ebd2296e01d5f73e46ef9 (patch)
treed9790622712a43dd93ea8873a7f8607d06afc471
parent705904552cb6c895c10f4489541fc07f0197656a (diff)
downloadorg-mode-bfed384cd8e6072ddf2ebd2296e01d5f73e46ef9.tar.gz
org-compat: Use lexical binding
* lisp/org-compat.el (org-move-to-column): (org-pop-to-buffer-same-window): Silence byte-compiler.
-rw-r--r--lisp/org-compat.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/org-compat.el b/lisp/org-compat.el
index 9d075f3..0e459c3 100644
--- a/lisp/org-compat.el
+++ b/lisp/org-compat.el
@@ -1,4 +1,4 @@
-;;; org-compat.el --- Compatibility code for Org-mode
+;;; org-compat.el --- Compatibility Code for Older Emacsen -*- lexical-binding: t; -*-
;; Copyright (C) 2004-2016 Free Software Foundation, Inc.
@@ -29,8 +29,7 @@
;;; Code:
-(eval-when-compile
- (require 'cl))
+(require 'cl-lib)
(require 'org-macs)
;; As of Emacs 25.1, `outline-mode' functions are under the 'outline-'
@@ -246,7 +245,7 @@ ignored in this case."
(if (consp buffer-invisibility-spec)
(member arg buffer-invisibility-spec)))
-(defun org-move-to-column (column &optional force buffer)
+(defun org-move-to-column (column &optional force _buffer)
"Move to column COLUMN.
Pass COLUMN and FORCE to `move-to-column'."
(let ((buffer-invisibility-spec
@@ -311,7 +310,7 @@ With two arguments, return floor and remainder of their quotient."
;; `pop-to-buffer-same-window' has been introduced in Emacs 24.1.
(defun org-pop-to-buffer-same-window
- (&optional buffer-or-name norecord label)
+ (&optional buffer-or-name norecord _label)
"Pop to buffer specified by BUFFER-OR-NAME in the selected window."
(if (fboundp 'pop-to-buffer-same-window)
(funcall