[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] scratch/auctex-lexbind e6910bb 07/13: Don't quote `lambda`
From: |
Stefan Monnier |
Subject: |
[elpa] scratch/auctex-lexbind e6910bb 07/13: Don't quote `lambda` |
Date: |
Tue, 23 Mar 2021 13:56:56 -0400 (EDT) |
branch: scratch/auctex-lexbind
commit e6910bb7c5357a6fe6d3919602a46aea41f480f1
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
Don't quote `lambda`
---
font-latex.el | 2 +-
latex.el | 10 +++++-----
preview.el.in | 13 ++++++++-----
tex.el | 10 +++++-----
texmathp.el | 2 +-
5 files changed, 20 insertions(+), 17 deletions(-)
diff --git a/font-latex.el b/font-latex.el
index 36edba2..554c2d8 100644
--- a/font-latex.el
+++ b/font-latex.el
@@ -115,7 +115,7 @@ If nil, quoted content will not be fontified."
:type '(choice (const auto) (const french) (const german) (const nil))
:group 'font-latex)
(put 'font-latex-quotes 'safe-local-variable
- '(lambda (x) (memq x '(auto french german nil))))
+ (lambda (x) (memq x '(auto french german nil))))
(defun font-latex-add-quotes (quotes)
"Add QUOTES to `font-latex-quote-list'.
diff --git a/latex.el b/latex.el
index 6f496e3..87bd23f 100644
--- a/latex.el
+++ b/latex.el
@@ -4802,11 +4802,11 @@ Setting this variable directly does not take effect;
use \\[customize]."
:group 'LaTeX-math
:initialize #'custom-initialize-default
- :set '(lambda (symbol value)
- (define-key LaTeX-math-mode-map (LaTeX-math-abbrev-prefix) t)
- (set-default symbol value)
- (define-key LaTeX-math-mode-map
- (LaTeX-math-abbrev-prefix) LaTeX-math-keymap))
+ :set (lambda (symbol value)
+ (define-key LaTeX-math-mode-map (LaTeX-math-abbrev-prefix) t)
+ (set-default symbol value)
+ (define-key LaTeX-math-mode-map
+ (LaTeX-math-abbrev-prefix) LaTeX-math-keymap))
:type '(string :tag "Key sequence"))
(defun LaTeX-math-abbrev-prefix ()
diff --git a/preview.el.in b/preview.el.in
index 9f51fb4..b80977d 100644
--- a/preview.el.in
+++ b/preview.el.in
@@ -2390,11 +2390,14 @@ BUFFER-MISC is the appropriate data to be used."
'(if (boundp 'desktop-buffer-mode-handlers)
(add-to-list 'desktop-buffer-mode-handlers
'(latex-mode . desktop-buffer-preview))
- (add-hook 'desktop-buffer-handlers '(lambda ()
- (desktop-buffer-preview
- desktop-buffer-file-name
- desktop-buffer-name
- desktop-buffer-misc)))))
+ (defvar desktop-buffer-file-name)
+ (defvar desktop-buffer-name)
+ (defvar desktop-buffer-misc)
+ (add-hook 'desktop-buffer-handlers (lambda ()
+ (desktop-buffer-preview
+ desktop-buffer-file-name
+ desktop-buffer-name
+ desktop-buffer-misc)))))
(defcustom preview-auto-cache-preamble 'ask
"Whether to generate a preamble cache format automatically.
diff --git a/tex.el b/tex.el
index 80de134..2ed3d91 100644
--- a/tex.el
+++ b/tex.el
@@ -2289,9 +2289,9 @@ the Emacs manual) to set this variable permanently for
each file."
(string :format "%v")))
(make-variable-buffer-local 'TeX-master)
(put 'TeX-master 'safe-local-variable
- '(lambda (x)
- (or (stringp x)
- (member x (quote (t nil shared dwim))))))
+ (lambda (x)
+ (or (stringp x)
+ (member x (quote (t nil shared dwim))))))
(defcustom TeX-one-master "\\.\\(texi?\\|dtx\\)$"
"Regular expression matching ordinary TeX files.
@@ -6648,8 +6648,8 @@ error."
(unless (member elt (default-value 'desktop-locals-to-save))
(setq-default desktop-locals-to-save
(cons elt (default-value 'desktop-locals-to-save)))))
- (add-hook 'desktop-after-read-hook '(lambda ()
- (TeX-set-mode-name t)))))
+ (add-hook 'desktop-after-read-hook (lambda ()
+ (TeX-set-mode-name t)))))
;; delsel.el, `delete-selection-mode'
(put 'TeX-newline 'delete-selection t)
diff --git a/texmathp.el b/texmathp.el
index cd9336b..ac2b75c 100644
--- a/texmathp.el
+++ b/texmathp.el
@@ -212,7 +212,7 @@ The structure of each entry is (NAME TYPE)
`sw-on' Switch: turns math-mode of following text on
`sw-off' Switch: turns math-mode of following text off
`sw-toggle' Switch: toggles math mode of following text"
- :set '(lambda (symbol value) (set-default symbol value) (texmathp-compile))
+ :set (lambda (symbol value) (set-default symbol value) (texmathp-compile))
:type
'(repeat
(list :value ("" env-on)
- [elpa] branch scratch/auctex-lexbind created (now 7606a49), Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind c037cac 02/13: Prepare for enabling lexical binding in preview.el.in, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 7ccff10 01/13: ; * latex.el (LaTeX-fill-region-as-paragraph): Fix typo., Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 7c2f403 03/13: * font-latex.el (font-latex-make-built-in-keywords): Reorder defs, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 1d188f5 05/13: Use #' rather than ' to quote functions, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind e6910bb 07/13: Don't quote `lambda`,
Stefan Monnier <=
- [elpa] scratch/auctex-lexbind d7bdc79 10/13: Expose the body of advice to the compiler, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 00ef597 09/13: Miscellaneous minor changes, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 7606a49 13/13: Use UTF-8 for all ELisp files, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 6ca7910 12/13: Prefer lexical closures over hand-built lambda forms, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 2852adf 11/13: Activate lexical-binding everywhere, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 7d89628 04/13: * font-latex.el (font-latex-make-built-in-keywords): Make it a macro, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 8de4670 06/13: Remove some redundant `:group` arguments, Stefan Monnier, 2021/03/23
- [elpa] scratch/auctex-lexbind 7a68408 08/13: Remove some XEmacs and old-Emacs code, Stefan Monnier, 2021/03/23