[Emacs-diffs] Changes to emacs/lisp/descr-text.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/descr-text.el
diff -c emacs/lisp/descr-text.el:1.13.4.9 emacs/lisp/descr-text.el:1.13.4.10
*** emacs/lisp/descr-text.el:1.13.4.9   Thu Nov  4 08:55:37 2004
--- emacs/lisp/descr-text.el    Fri Nov 12 02:52:52 2004
***************
*** 499,505 ****
                  (format (if (< code 256) "0x%02X" "0x%04X") code)
                (format "0x%04X%04X" (car code) (cdr code))))
            ("syntax"
!            ,(let ((syntax (syntax-after pos)))
                (with-temp-buffer
                  (internal-describe-syntax-value syntax)
                  (buffer-string))))
--- 499,508 ----
                  (format (if (< code 256) "0x%02X" "0x%04X") code)
                (format "0x%04X%04X" (car code) (cdr code))))
            ("syntax"
!            ,(let* ((st (if parse-sexp-lookup-properties
!                            (get-char-property pos 'syntax-table)))
!                    (syntax (if (consp st) st
!                              (aref (or st (syntax-table)) (char-after pos)))))
                (with-temp-buffer
                  (internal-describe-syntax-value syntax)
                  (buffer-string))))