chiark / gitweb /
buf: Fix two embarassing bugs found while writing Lisp bindings.
[mLib] / dputf.c
diff --git a/dputf.c b/dputf.c
index 85b6c65eabe17aac8ec61b42c38539dc82eeabc3..7ca969a2949acbb851f08332db4140d58bbe2bee 100644 (file)
--- a/dputf.c
+++ b/dputf.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: dputf.c,v 1.6 2004/04/08 01:36:11 mdw Exp $
+ * $Id$
  *
  * `printf'-style formatting for dynamic strings
  *
@@ -131,6 +131,7 @@ int dstr_vputf(dstr *d, const char *p, va_list *ap)
          DPUTC(&dd, '.');
          ip = ≺
          f |= f_prec;
+         p++;
          goto getnum;
        case '*':
          ip = &wd;