emacs-pretest-bug
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: "cl-map-keymap: Lisp nesting exceeds max-lisp-eval-depth"


From: emacs user
Subject: Re: "cl-map-keymap: Lisp nesting exceeds max-lisp-eval-depth"
Date: Sun, 14 Nov 2004 09:43:48 -0500



From: Richard Stallman <address@hidden>
Reply-To: address@hidden
To: "emacs user" <address@hidden>
CC: address@hidden
Subject: Re: "cl-map-keymap: Lisp nesting exceeds max-lisp-eval-depth"
Date: Sun, 14 Nov 2004 01:00:25 -0500

Does x-symbol load the file lucid.el?
If so, maybe I see the problem.


yes, there is a (require 'lucid) at some point.
here is the relevant code part from x-symbol:

;;; Extents ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(require 'lucid)
(unless (fboundp 'extent-property) (defalias 'extent-property 'overlay-get))
(unless (fboundp 'map-extents) (defalias 'map-extents 'cl-map-overlays))
(unless (fboundp 'set-extent-end-glyph)
 (defun set-extent-end-glyph (extent glyph)
   (overlay-put extent 'after-string glyph)))
(unless (fboundp 'insert-face)
 (defun insert-face (string face)
   (let ((ol (make-overlay (point) (progn (insert string) (point)))))
     (overlay-put ol 'face face) ol)))

_________________________________________________________________
On the road to retirement? Check out MSN Life Events for advice on how to get there! http://lifeevents.msn.com/category.aspx?cid=Retirement





reply via email to

[Prev in Thread] Current Thread [Next in Thread]