diff --git a/lisp/org-compat.el b/lisp/org-compat.el index 9d075f33e..0e459c320 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