spec (match-string 1 string))
(unless (string-equal spec "%")
(or (setq match (assoc (downcase spec) units))
- (error "Bad format specifier: `%s'" spec))
+ (error "Bad format specifier: ā%sā" spec))
(if (assoc (downcase spec) usedunits)
- (error "Multiple instances of specifier: `%s'" spec))
+ (error "Multiple instances of specifier: ā%sā" spec))
(if (string-equal (car match) "z")
(setq zeroflag t)
(unless larger