diff Misc/python-mode.el @ 9897:7bdef4bedd5c legacy-trunk

(py-electric-delete): Implement the XEmacs 21 blessed way of checking for delete forwardness.
author Barry Warsaw <barry@python.org>
date Fri, 15 Jan 1999 02:12:31 +0000
parents ef97b4f6d187
children 6cf01eab05a3
line wrap: on
line diff
--- a/Misc/python-mode.el	Thu Jan 14 22:40:30 1999 +0000
+++ b/Misc/python-mode.el	Fri Jan 15 02:12:31 1999 +0000
@@ -1519,10 +1519,11 @@
 \\[universal-argument] (programmatically, argument ARG) specifies the
 number of characters to delete (default is 1)."
   (interactive "*p")
-  (if (and (boundp 'delete-key-deletes-forward)
-	   delete-key-deletes-forward)
+  (if (or (and (fboundp 'delete-forward-p) ;XEmacs 21
+	       (delete-forward-p))
+	  (and (boundp 'delete-key-deletes-forward) ;XEmacs 20
+	       delete-key-deletes-forward))
       (funcall py-delete-function arg)
-    ;; else
     (py-electric-backspace arg)))
 
 ;; required for pending-del and delsel modes