Align decoded ethernet addresses

Julien LepillerMon Feb 01 02:20:37+0100 2021

0578eed

Align decoded ethernet addresses

netlink/route/attrs.scm

179179 
180180 
(define (deserialize-route-attr-data-ethernet decoder bv pos)
181181 
  (make-ethernet-route-attr
182-
    (string-join (map (lambda (n) (number->string n 16))
182+
    (string-join (map (lambda (n)
183+
                        (let ((s (number->string n 16)))
184+
                          (if (equal? (string-length s) 1)
185+
                              (string-append "0" s)
186+
                              s)))
183187 
                      (bytevector->u8-list bv))
184188 
                 ":")))
185189