summaryrefslogtreecommitdiff
path: root/lisp/allout.el
diff options
context:
space:
mode:
authorAndreas Schwab <schwab@linux-m68k.org>2012-08-07 18:12:20 +0200
committerAndreas Schwab <schwab@linux-m68k.org>2012-08-07 18:12:20 +0200
commit651eaf36f227ac6067263fe1fb9a7c56984a9b6d (patch)
tree63f5f8839f74c768b85cbfc204cf8d15c45045fa /lisp/allout.el
parentc644523bd8a23e518c91b61a1b8520e866b715b9 (diff)
downloademacs-651eaf36f227ac6067263fe1fb9a7c56984a9b6d.tar.gz
* calc/calc-prog.el (math-do-defmath): Use backquote forms. Fix
handling of interactive spec when the body uses return. (math-do-arg-check, math-define-function-body): Use backquote forms. * calc/calc-ext.el (math-defcache): Likewise. * calc/calc-rewr.el (math-rwfail, math-rweval): Likewise. * allout.el (allout-new-exposure): Likewise. * calc/calcalg2.el (math-tracing-integral): Likewise. * info.el (Info-last-menu-item): Likewise. * emulation/vip.el (vip-loop): Likewise. * textmodes/artist.el (artist-funcall): Likewise. * menu-bar.el (menu-bar-make-mm-toggle, menu-bar-make-toggle): Construct menu-item directly. * cedet/ede/base.el (ede-with-projectfile): Use backquote forms.
Diffstat (limited to 'lisp/allout.el')
-rw-r--r--lisp/allout.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/allout.el b/lisp/allout.el
index 7077af55e60..9034d009797 100644
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -5312,11 +5312,11 @@ Examples:
Expose children and grandchildren of first topic at current
level, and expose children of subsequent topics at current
level *except* for the last, which should be opened completely."
- (list 'save-excursion
- '(if (not (or (allout-goto-prefix-doublechecked)
- (allout-next-heading)))
- (error "allout-new-exposure: Can't find any outline topics"))
- (list 'allout-expose-topic (list 'quote spec))))
+ `(save-excursion
+ (if (not (or (allout-goto-prefix-doublechecked)
+ (allout-next-heading)))
+ (error "allout-new-exposure: Can't find any outline topics"))
+ (allout-expose-topic ',spec)))
;;;_ #7 Systematic outline presentation -- copying, printing, flattening