semantic lisp code help please

I'm bringing in a new version of semantic (to go with JDE 2.2.5) and this snippet of code is giving me hell... ,---- | (defun semantic-clear-toplevel-cache () | "Clear the toplevel bovin cache for the current buffer." | (interactive) | (setq semantic-toplevel-bovine-cache nil) | ;; Nuke all semantic overlays. This is faster than deleting based | ;; on our data structure. | (let ((l (overlay-lists))) | (mapcar 'semantic-delete-overlay-maybe (car l)) | (mapcar 'semantic-delete-overlay-maybe (cdr l)) | ) | ;; Remove this hook which tracks if a buffer is up to date or not. | (remove-hook 'after-change-functions 'semantic-change-function t) | ) | (add-hook 'change-major-mode-hook 'semantic-clear-toplevel-cache) `---- eval-defun gives no error, but it gives... 'Symbols function definition is void: overlay-lists' whenever 'change-major-mode-hook' is called. If what I've given here isn't enough to debug this problem I'll put the semantic-1.3 tarball on ftp.xemacs.org/pub/xemacs/beta/experimental/. -- |---<Regards, Steve Youngs>-----------[GnuPG KeyID: EFD82ED2]---| | XEmacs - It's not just an editor... | | It's a way of life. | |----------------------------------<mailto:youngs＠xemacs.org>---|