diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/imenu.el | 5 |
2 files changed, 9 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d7fc48c0e22..b62b7b0fbf7 100644 --- 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 555aceb0bab..01bb422cedd 100644 --- 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") ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; |