Synch with Wanderlust (201104130848).

2011-04-13  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 * ptexinfmt.el: Use lexical binding.
 (ptexinfmt-broken-facility): Rename _dummy argument.
 (texinfo-enclosure-list, texinfo-alias-list): Add defvar stub for
 lexical binding.

diff --git a/ChangeLog b/ChangeLog
index 34b94a0..242df39 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2011-04-13  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * ptexinfmt.el: Use lexical binding.
+       (ptexinfmt-broken-facility): Rename _dummy argument.
+       (texinfo-enclosure-list, texinfo-alias-list): Add defvar stub for
+       lexical binding.
+
 2011-03-18  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * Gnus-Doc-Ja: The version for No Gnus v0.15 is released.

diff --git a/ptexinfmt.el b/ptexinfmt.el
index 528f252..b36734e 100644 (file)
--- a/ptexinfmt.el
+++ b/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."
@@ -124,6 +124,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