(defun compare-windows nil "\ Compare text in current window with text in next window. Compares the text starting at point in each window, moving over text in each one as far as they match." (interactive) (byte-code "͈ÍÍÍÍÍÍÍÍÍ` `p‰ˆÎĪ !‰ˆĪ =ƒ6ĐŅ!‚7͈Ō!Ķ!‰ˆd‰ˆŠ qˆd‰)ˆÔ‰ˆÕV…Æʉˆ…šÖ Z Z#‰ˆŠ qˆ×  \\\"‰ )ˆ×\\\"‰ ˆÕV…Ø  \"‰ˆƒ´\\ \\‰‚ĩ͈‚bˆŲÚ\"‰ˆ‚VˆbˆÛ \"ˆ` UƒÜÜ ‚ŨÍ. ‡" [p1 p2 maxp1 maxp2 b1 b2 w2 success size opoint t s2 s1 nil next-window selected-window error "No other window." window-point window-buffer 1000 0 min buffer-substring equal / 2 set-window-point ding] 14))