comparison etc/PROBLEMS @ 40537:12c60dbbc4fe

Work around a bug in diff-mode.el.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 31 Oct 2001 02:26:38 +0000
parents 32b7ea7d8293
children 04c9ddfb2b2a
comparison
equal deleted inserted replaced
40536:8808162a219d 40537:12c60dbbc4fe
520 @@ -1646,3 +1646,3 @@ 520 @@ -1646,3 +1646,3 @@
521 (goto-char (sgml-element-end element)) 521 (goto-char (sgml-element-end element))
522 - (let ((before-change-function nil)) 522 - (let ((before-change-function nil))
523 + (let ((before-change-functions nil)) 523 + (let ((before-change-functions nil))
524 (sgml-normalize-content element only-one))) 524 (sgml-normalize-content element only-one)))
525 Index: psgml-other.el
525 --- psgml-other.el 2001/03/03 00:23:42 1.1 526 --- psgml-other.el 2001/03/03 00:23:42 1.1
526 +++ psgml-other.el 2001/03/03 00:30:05 527 +++ psgml-other.el 2001/03/03 00:30:05
527 @@ -32,2 +32,3 @@ 528 @@ -32,2 +32,3 @@
528 (require 'easymenu) 529 (require 'easymenu)
529 +(eval-when-compile (require 'cl)) 530 +(eval-when-compile (require 'cl))
554 - (when (< start end) 555 - (when (< start end)
555 - (put-text-property (1- end) end 'rear-nonsticky '(face))))) 556 - (put-text-property (1- end) end 'rear-nonsticky '(face)))))
556 + (when (and (not modified) (buffer-modified-p)) 557 + (when (and (not modified) (buffer-modified-p))
557 + (set-buffer-modified-p nil)))) 558 + (set-buffer-modified-p nil))))
558 (t 559 (t
560 Index: psgml-parse.el
559 --- psgml-parse.el 2001/03/03 00:23:57 1.1 561 --- psgml-parse.el 2001/03/03 00:23:57 1.1
560 +++ psgml-parse.el 2001/03/03 00:29:56 562 +++ psgml-parse.el 2001/03/03 00:29:56
561 @@ -40,2 +40,4 @@ 563 @@ -40,2 +40,4 @@
562 564
563 +(eval-when-compile (require 'cl)) 565 +(eval-when-compile (require 'cl))
660 + (setq overriding-terminal-local-map nil)) 662 + (setq overriding-terminal-local-map nil))
661 663
662 (defun calc-invert-func () 664 (defun calc-invert-func ()
663 (save-excursion 665 (save-excursion
664 666
667 Index: Makefile
665 --- Makefile.~1~ Sun Dec 15 23:50:45 1996 668 --- Makefile.~1~ Sun Dec 15 23:50:45 1996
666 +++ Makefile Thu Nov 30 15:09:45 2000 669 +++ Makefile Thu Nov 30 15:09:45 2000
667 @@ -41,7 +41,7 @@ 670 @@ -41,7 +41,7 @@
668 671
669 # Other macros. 672 # Other macros.
684 +maint: calc-maint.el 687 +maint: calc-maint.el
685 688
686 # Create an Emacs TAGS file 689 # Create an Emacs TAGS file
687 tags: TAGS 690 tags: TAGS
688 691
692 Index: calc-aent.el
689 --- calc-aent.el.~1~ Sun Dec 15 23:50:36 1996 693 --- calc-aent.el.~1~ Sun Dec 15 23:50:36 1996
690 +++ calc-aent.el Tue Nov 21 18:34:33 2000 694 +++ calc-aent.el Tue Nov 21 18:34:33 2000
691 @@ -385,7 +385,7 @@ 695 @@ -385,7 +385,7 @@
692 (calc-minibuffer-contains 696 (calc-minibuffer-contains
693 "\\`\\([^\"]*\"[^\"]*\"\\)*[^\"]*\"[^\"]*\\'")) 697 "\\`\\([^\"]*\"[^\"]*\"\\)*[^\"]*\"[^\"]*\\'"))
729 - (setq calc-digit-value (buffer-string)) 733 - (setq calc-digit-value (buffer-string))
730 + (setq calc-digit-value (field-string)) 734 + (setq calc-digit-value (field-string))
731 (exit-minibuffer) 735 (exit-minibuffer)
732 ) 736 )
733 737
738 Index: calc.el
734 --- calc.el.~1~ Sun Dec 15 23:50:47 1996 739 --- calc.el.~1~ Sun Dec 15 23:50:47 1996
735 +++ calc.el Wed Nov 22 13:08:49 2000 740 +++ calc.el Wed Nov 22 13:08:49 2000
736 @@ -2051,11 +2051,11 @@ 741 @@ -2051,11 +2051,11 @@
737 ;; Exercise for the reader: Figure out why this is a good precaution! 742 ;; Exercise for the reader: Figure out why this is a good precaution!
738 (or (boundp 'calc-buffer) 743 (or (boundp 'calc-buffer)