# HG changeset patch
# User Colin Walters <walters@gnu.org>
# Date 1019771149 0
# Node ID 590c97430876a4048367d6ae056c801d81ef29f9
# Parent  c18dd95f696298f160e08cde5358ba98f817ba63
(occur-engine): Pad digits to the right.

diff -r c18dd95f6962 -r 590c97430876 lisp/replace.el
--- a/lisp/replace.el	Thu Apr 25 21:45:22 2002 +0000
+++ b/lisp/replace.el	Thu Apr 25 21:45:49 2002 +0000
@@ -771,7 +771,7 @@
 			;; Generate the string to insert for this match
 			(let* ((out-line
 				(concat
-				 (apply #'propertize (format "%-6d:" l)
+				 (apply #'propertize (format "%6d:" l)
 					(append
 					 (when prefix-face
 					   `(face prefix-face))