projects
/
chise
/
xemacs-chise.git.1
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add some GT code points.
[chise/xemacs-chise.git.1]
/
lisp
/
obsolete.el
diff --git
a/lisp/obsolete.el
b/lisp/obsolete.el
index
8e8571f
..
94f201f
100644
(file)
--- a/
lisp/obsolete.el
+++ b/
lisp/obsolete.el
@@
-106,6
+106,8
@@
setting NEWVAR and marks OLDVAR as provided for compatibility only."
(make-obsolete 'set-window-dot 'set-window-point)
(define-obsolete-function-alias 'extent-buffer 'extent-object)
(make-obsolete 'set-window-dot 'set-window-point)
(define-obsolete-function-alias 'extent-buffer 'extent-object)
+(define-compatible-variable-alias 'parse-sexp-lookup-properties
+ 'lookup-syntax-properties)
;;;;;;;;;;;;;;;;;;;;;;;;;;;; frames
(defun frame-first-window (frame)
;;;;;;;;;;;;;;;;;;;;;;;;;;;; frames
(defun frame-first-window (frame)
@@
-257,6
+259,11
@@
set Info-directory-list.")
(make-obsolete-variable 'executing-macro 'executing-kbd-macro)
(make-obsolete-variable 'executing-macro 'executing-kbd-macro)
+(define-compatible-function-alias 'interactive-form
+ 'function-interactive) ;GNU 21.1
+(define-compatible-function-alias 'assq-delete-all
+ 'remassq) ;GNU 21.1
+
;;;;;;;;;;;;;;;;;;;;;;;;;;;; modeline
(define-compatible-function-alias 'redraw-mode-line 'redraw-modeline)
;;;;;;;;;;;;;;;;;;;;;;;;;;;; modeline
(define-compatible-function-alias 'redraw-mode-line 'redraw-modeline)
@@
-386,5
+393,8
@@
the resulting string may be narrower than END-COLUMN."
(make-obsolete 'function-called-at-point 'function-at-point)
(make-obsolete 'function-called-at-point 'function-at-point)
+(when (featurep 'utf-2000)
+ (make-obsolete-variable 'utf-2000-version 'xemacs-chise-version))
+
(provide 'obsolete)
;;; obsolete.el ends here
(provide 'obsolete)
;;; obsolete.el ends here