(imenu-example--name-and-position, imenu-example--lisp-extract-index-name)

(imenu-example--create-lisp-index, imenu-example--create-c-index):
Mark as obsolete.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d7fc48c0e22d90eeacb38a3dfbca83e3c4ccd242..b62b7b0fbf7b3a3ca6f83204f2bf670ca9561b0c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 2009-08-19  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * imenu.el (imenu-example--name-and-position)
+       (imenu-example--lisp-extract-index-name)
+       (imenu-example--create-lisp-index, imenu-example--create-c-index):
+       Mark as obsolete.
+
        * progmodes/prolog.el (inferior-prolog-error-regexp-alist): New var.
        (inferior-prolog-mode): Use it.
        (inferior-prolog-load-file): Reset list of errors.

diff --git a/lisp/imenu.el b/lisp/imenu.el
index 555aceb0bab5870c4151d3d7453938237cd63e12..01bb422cedde6fb7c8a6900ce6db6be3e5789ec2 100644 (file)
--- a/lisp/imenu.el
+++ b/lisp/imenu.el
@@ -310,6 +310,7 @@ Don't move point."
          (end (progn (forward-sexp) (point))))
       (cons (buffer-substring beg end)
            beg))))
+(make-obsolete 'imenu-example--name-and-position "your own" "23.2")
 
 ;;;
 ;;; Lisp
@@ -328,6 +329,7 @@ Don't move point."
                     (end (progn (forward-sexp -1) (point))))
                 (buffer-substring beg end)))
           (error nil)))))
+(make-obsolete 'imenu-example--lisp-extract-index-name "your own" "23.2")
 
 (defun imenu-example--create-lisp-index ()
   ;; Example of a candidate for `imenu-create-index-function'.
@@ -379,6 +381,7 @@ Don't move point."
         (push (cons "Syntax-unknown" index-unknown-alist)
               index-alist))
     index-alist))
+(make-obsolete 'imenu-example--create-lisp-index "your own" "23.2")
 
 ;; Regular expression to find C functions
 (defvar imenu-example--function-name-regexp-c
@@ -410,7 +413,7 @@ Don't move point."
            (push (imenu-example--name-and-position) index-alist))))
     (imenu-progress-message prev-pos 100)
     (nreverse index-alist)))
-
+(make-obsolete 'imenu-example--create-c-index "your own" "23.2")
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;