zone-mode increments zone serial by 2

[Peter 'Luna' Runestig]

Symptoms:

When you edit a named zone file with zone-mode, the zone serial
number, in the form YYYYMMDDNN, is automaticly incremented. But it's
incremented by 2, not 1!. The first serial number of a new day is as
expected, e.g. 2003112801. But if you change the file and saves it
again, it's changed to 2003112803. Looking at the lisp code (I don't
know much about lisp), it seems that the intention is to only
increment by one. Maybe the incremental code is called twice? This
isn't exactly a show stopper, but maybe a little annoying for a
perfectionist. And it leaves me with only 50 zone updates a day ;-)

- Peter


In GNU Emacs 21.3.50.1 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2003-07-21 on arthur.runestig.com
configured using `configure '--sysconfdir=/etc' '--localstatedir=/var' 
'--with-x-toolkit=lucid' '--with-xpm' '--with-jpeg' '--with-tiff' '--with-gif' 
'--with-png''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: en_US
  locale-coding-system: iso-latin-1
  default-enable-multibyte-characters: t

Recent input:
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <C-home> C-x C-s <help-echo> 
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo> 
<help-echo> <help-echo> <menu-bar> <buffer> "*Messages*" 
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo> 
<help-echo> <menu-bar> <help-menu> <report-emacs-b
ug>

Recent messages:
Loading image...done
Loading tooltip...done
For information about the GNU Project and its goals, type C-h C-p.
Loading zone-mode...done
call-interactively: End of buffer
Undo!
Mark set
Saving file /tmp/sbl.runestig.com.juO1Fq...
Updated /tmp/sbl.runestig.com.juO1Fq
Loading emacsbug...done