diff lisp/simple.el @ 82950:ed8435ec5652 before-merge-multi-tty-to-trunk

(invisible-p): Remove: implemented in C now. (line-move-invisible-p): Remove obsolete alias.

--- a/lisp/simple.el	Tue Aug 28 22:42:44 2007 +0000
+++ b/lisp/simple.el	Wed Aug 29 01:14:48 2007 +0000
@@ -3639,16 +3639,6 @@
   :type 'boolean
   :group 'editing-basics)
 
-(defun invisible-p (pos)
-  "Return non-nil if the character after POS is currently invisible."
-  (let ((prop
-	 (get-char-property pos 'invisible)))
-    (if (eq buffer-invisibility-spec t)
-	prop
-      (or (memq prop buffer-invisibility-spec)
-	  (assq prop buffer-invisibility-spec)))))
-(define-obsolete-function-alias 'line-move-invisible-p 'invisible-p)
-
 ;; Returns non-nil if partial move was done.
 (defun line-move-partial (arg noerror to-end)
   (if (< arg 0)