diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-06-23 09:25:33 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-06-23 09:25:33 +0200 |
commit | bfed384cd8e6072ddf2ebd2296e01d5f73e46ef9 (patch) | |
tree | d9790622712a43dd93ea8873a7f8607d06afc471 | |
parent | 705904552cb6c895c10f4489541fc07f0197656a (diff) | |
download | org-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.el | 9 |
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 |