[Emacs-diffs] Changes to emacs/lisp/language/devan-util.el

[Dave Love]

Index: emacs/lisp/language/devan-util.el
diff -c emacs/lisp/language/devan-util.el:1.34 
emacs/lisp/language/devan-util.el:1.35
*** emacs/lisp/language/devan-util.el:1.34      Mon Nov 26 23:20:52 2001
--- emacs/lisp/language/devan-util.el   Sat Dec 15 12:51:41 2001
***************
*** 75,80 ****
--- 75,89 ----
      (devanagari-compose-region (point-min) (point-max))
      (buffer-string)))
  
+ (defun devanagari-post-read-conversion (len)
+   (save-excursion
+     (save-restriction
+       (let ((buffer-modified-p (buffer-modified-p)))
+       (narrow-to-region (point) (+ (point) len))
+       (devanagari-compose-region (point-min) (point-max))
+       (set-buffer-modified-p buffer-modified-p)
+       (- (point-max) (point-min))))))
+ 
  (defun range (from to)
    "Make the list of the integers of range FROM to TO."
    (let (result)