From 7f4eb868ba231a6d8a8354f3a9344f0266ce39fa Mon Sep 17 00:00:00 2001 From: kaoru Date: Wed, 13 Apr 2011 08:48:26 +0000 Subject: [PATCH] * ptexinfmt.el: Use lexical binding. (ptexinfmt-broken-facility): Rename _dummy argument. (texinfo-enclosure-list, texinfo-alias-list): Add defvar stub for lexical binding. --- utils/ChangeLog | 7 +++++++ utils/ptexinfmt.el | 6 ++++-- 2 files changed, 11 insertions(+), 2 deletions(-) diff --git a/utils/ChangeLog b/utils/ChangeLog index 6c41ade..e8e7c53 100644 --- a/utils/ChangeLog +++ b/utils/ChangeLog @@ -1,3 +1,10 @@ +2011-04-13 TAKAHASHI Kaoru + + * ptexinfmt.el: Use lexical binding. + (ptexinfmt-broken-facility): Rename _dummy argument. + (texinfo-enclosure-list, texinfo-alias-list): Add defvar stub for + lexical binding. + 2010-09-02 TAKAHASHI Kaoru * ptexinfmt.el (texinfo-multitable-widths): Use `make-char' diff --git a/utils/ptexinfmt.el b/utils/ptexinfmt.el index 4c3e9ec..d22ad8c 100644 --- a/utils/ptexinfmt.el +++ b/utils/ptexinfmt.el @@ -1,4 +1,4 @@ -;;; ptexinfmt.el -- portable Texinfo formatter. +;;; ptexinfmt.el -- portable Texinfo formatter. -*- lexical-binding: t -*- ;; Copyright (C) 1985, 1986, 1988, 1990, 1991, 1992, 1993, ;; 1994, 1995, 1996, 1997 Free Software Foundation, Inc. @@ -69,7 +69,7 @@ This is last argument in `ptexinfmt-broken-facility'.") (put 'ptexinfmt-broken-facility 'lisp-indent-function 'defun) (defmacro ptexinfmt-broken-facility (facility docstring assertion - &optional dummy) + &optional _dummy) "Declare a symbol FACILITY is broken if ASSERTION is nil. DOCSTRING will be printed if ASSERTION is nil and `ptexinfmt-disable-broken-notice-flag' is nil." @@ -129,6 +129,8 @@ DOCSTRING will be printed if ASSERTION is nil and t)) ;; @var{METASYNTACTIC-VARIABLE} +(defvar texinfo-enclosure-list) +(defvar texinfo-alias-list) (ptexinfmt-broken-facility texinfo-format-var "Don't perse @var argument." (condition-case nil -- 1.7.10.4