blob: 31deb6155bad9fa946c09c1bafe9c2a1003e1c89 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
;;; -*- lexical-binding: t -*-
(defvar foo-obsolete nil)
(make-obsolete-variable 'foo-obsolete nil "99.99")
;; From bytecomp.el:
;; If foo.el declares `toto' as obsolete, it is likely that foo.el will
;; actually use `toto' in order for this obsolete variable to still work
;; correctly, so paradoxically, while byte-compiling foo.el, the presence
;; of a make-obsolete-variable call for `toto' is an indication that `toto'
;; should not trigger obsolete-warnings in foo.el.
(defun foo ()
foo-obsolete)
|
