--- a/lisp/ilisp/ilisp-out.el	Mon Aug 13 09:03:47 2007 +0200
+++ b/lisp/ilisp/ilisp-out.el	Mon Aug 13 09:04:33 2007 +0200
@@ -262,7 +262,8 @@
   "Find the window directly below us, if any.  This is probably the 
  window from which enlarge-window would steal lines."
   (if (or (not (string-match "XEmacs" emacs-version))
-	  (< emacs-minor-version 12))
+	  (and (= emacs-major-version 19)
+	       (< emacs-minor-version 12)))
       (let* ((bottom (nth 3 (window-edges window)))
 	     (window* nil)
 	     (win window))
@@ -279,7 +280,8 @@
 (defun ilisp-find-top-left-most-window ()
   "Return the leftmost topmost window on the current screen."
   (if (or (not (string-match "XEmacs" emacs-version))
-	  (< emacs-minor-version 12))
+	  (and (= emacs-major-version 19)
+	       (< emacs-minor-version 12)))
       (let* ((window* (selected-window))
 	     (edges* (window-edges window*))
 	     (win nil)