Issue 4985: Avoid a few trivial lambda function wrappers

[lilypond.git] / scm / music-functions.scm

diff --git a/scm/music-functions.scm b/scm/music-functions.scm
index dd919624624439e400efe5f67e3e00f91e162743..3e9818d0093b48c1d0072dbfe3d7fa2d97efcf18 100644 (file)
--- a/scm/music-functions.scm
+++ b/scm/music-functions.scm
@@ -2313,9 +2313,7 @@ list or if there is a type-mismatch, @var{arg} will be returned."
               (number-pair? offsets)))
      (coord-translate arg offsets))
     ((and (number-pair-list? arg) (number-pair-list? offsets))
-     (map
-       (lambda (x y) (coord-translate x y))
-       arg offsets))
+     (map coord-translate arg offsets))
     (else arg)))
 
 (define-public (grob-transformer property func)