\\([0-9A-Fa-f][0-9A-Fa-f]\\)\\)"
string index)
(if (match-beginning 2)
- (setq string (replace-match "\\2" t t string)
+ (setq string (replace-match "\\2" t nil string)
index (1- (match-end 0)))
(if (match-beginning 3)
(setq string (replace-match (string (string-to-number