SOURCES: xemacs-ispell-pkg-xml.patch - modified to version 1.32 of...

[piti]

Author: piti                         Date: Mon Oct  9 06:31:27 2006 GMT
Module: SOURCES                       Tag: HEAD
---- Log message:
- modified to version 1.32 of package

---- Files affected:
SOURCES:
   xemacs-ispell-pkg-xml.patch (1.1 -> 1.2) 

---- Diffs:

================================================================
Index: SOURCES/xemacs-ispell-pkg-xml.patch
diff -u SOURCES/xemacs-ispell-pkg-xml.patch:1.1 SOURCES/xemacs-ispell-pkg-xml.patch:1.2
--- SOURCES/xemacs-ispell-pkg-xml.patch:1.1	Sun Mar 25 13:51:15 2001
+++ SOURCES/xemacs-ispell-pkg-xml.patch	Mon Oct  9 08:31:22 2006
@@ -1,16 +1,16 @@
 diff -Nur --exclude *~ xemacs-ispell-pkg-1.22/lisp/ispell/ispell.el xemacs-ispell-pkg-1.22.new/lisp/ispell/ispell.el
 --- xemacs-ispell-pkg-1.22/lisp/ispell/ispell.el	Fri Oct 27 18:43:54 2000
 +++ xemacs-ispell-pkg-1.22.new/lisp/ispell/ispell.el	Sun Mar 25 12:49:13 2001
-@@ -2881,10 +2881,10 @@
+@@ -3393,10 +3393,10 @@
  	(if (not (eq ispell-parser 'tex))
  	    (set (make-local-variable 'ispell-parser) 'tex)))
-     (process-send-string ispell-process "-\n"))	; set mode to normal (nroff)
+     (ispell-send-string "-\n"))		; set mode to normal (nroff)
 -  ;; If needed, test for SGML & HTML modes and set a buffer local nil/t value.
 +  ;; If needed, test for SGML & HTML & XML modes and set a buffer local nil/t value.
-   (if (and ispell-skip-sgml (not (eq ispell-skip-sgml t)))
-       (set (make-local-variable 'ispell-skip-sgml)
--	   (not (null (string-match "sgml\\|html"
-+	   (not (null (string-match "sgml\\|html\\|xml"
- 				    (downcase (symbol-name major-mode)))))))
+   (if (and ispell-skip-html (not (eq ispell-skip-html t)))
+       (setq ispell-skip-html
+-	    (not (null (string-match "sgml\\|html"
++	    (not (null (string-match "sgml\\|html\\|xml"
+ 				     (downcase (symbol-name major-mode)))))))
    ;; Set default extended character mode for given buffer, if any.
    (let ((extended-char-mode (ispell-get-extended-character-mode)))
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/SOURCES/xemacs-ispell-pkg-xml.patch?r1=1.1&r2=1.2&f=u