From c28a21a139c65643afed3eab7b329ca7380c131f Mon Sep 17 00:00:00 2001
From: Patrick McCarty <pnorcks@gmail.com>
Date: Sat, 1 Aug 2009 16:44:22 -0700
Subject: [PATCH] SVG backend: nitpick: use unary negation

---
 scm/output-svg.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scm/output-svg.scm b/scm/output-svg.scm
index 11223df43d..c916067bdf 100644
--- a/scm/output-svg.scm
+++ b/scm/output-svg.scm
@@ -509,7 +509,7 @@
 ;; rotate around given point
 (define (setrotation ang x y)
   (ly:format "<g transform=\"rotate(~4f, ~4f, ~4f)\">\n"
-	     (* -1 ang) x (* -1 y)))
+	     (- ang) x (- y)))
 
 (define (text font string)
   (dispatch `(fontify ,font ,(entity 'tspan (string->entities string)))))
-- 
2.39.5