>>>"HS" == I myself just wrote:
HS> You are correct, the last statement in forms--show-record is the only
HS> one needing a modification. Sorry for my strong wording ("cluttered")
HS> and choosing an obviously wrong example (man, I must have been really
HS> tired).
Here is the obvious patch (int-to-string should also be in Gnu Emacs,
at least as ob 19.28.1):
[kindofblue->forms]diff -u forms.el.orig forms.el
--- forms.el.orig Tue Jan 12 10:52:25 1999
+++ forms.el Tue Jan 12 10:52:28 1999
@@ -1706,7 +1706,8 @@
(set-buffer-modified-p nil)
(setq buffer-read-only forms-read-only)
(setq mode-line-process
- (concat " " forms--current-record "/" forms--total-records)))
+ (concat " " (int-to-string forms--current-record)
+ "/" (int-to-string forms--total-records))))
(defun forms--parse-form ()
"Parse contents of form into list of strings."
Holger
--
---
http://www.coling.uni-freiburg.de/~schauer/ ---
" Well you reach the point where you know
It's only your second skin"
-- Chameleons, "Second skin"