75 |
(devanagari-compose-region (point-min) (point-max)) |
(devanagari-compose-region (point-min) (point-max)) |
76 |
(buffer-string))) |
(buffer-string))) |
77 |
|
|
78 |
|
(defun devanagari-post-read-conversion (len) |
79 |
|
(save-excursion |
80 |
|
(save-restriction |
81 |
|
(let ((buffer-modified-p (buffer-modified-p))) |
82 |
|
(narrow-to-region (point) (+ (point) len)) |
83 |
|
(devanagari-compose-region (point-min) (point-max)) |
84 |
|
(set-buffer-modified-p buffer-modified-p) |
85 |
|
(- (point-max) (point-min)))))) |
86 |
|
|
87 |
(defun range (from to) |
(defun range (from to) |
88 |
"Make the list of the integers of range FROM to TO." |
"Make the list of the integers of range FROM to TO." |
89 |
(let (result) |
(let (result) |