From c7be504be44191cccf5984678720ead0a873cf1b Mon Sep 17 00:00:00 2001
From: =?utf8?q?Fr=C3=A9d=C3=A9ric=20Jolliton?= <git@frederic.jolliton.com>
Date: Mon, 28 May 2007 19:20:14 +0200
Subject: [PATCH] Fix lang-o (reversed -> reverted)

---
 paths-ttf.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/paths-ttf.lisp b/paths-ttf.lisp
index ffac6b0..52043c9 100644
--- a/paths-ttf.lisp
+++ b/paths-ttf.lisp
@@ -73,12 +73,12 @@
 
 (defun make-string-path (font-loader text
                          &key (position (make-point 0 0)) (size 12)
-                         (halign :left) (valign :baseline) (inversed t) (kerning t))
+                         (halign :left) (valign :baseline) (inverted t) (kerning t))
   (let* ((em (units/em font-loader))
          (scale (/ size em))
          (scale-x scale)
          (scale-y scale))
-    (when inversed
+    (when inverted
       (setf scale-y (- scale-y)))
     (let ((bb (string-bounding-box text font-loader :kerning kerning)))
       (setf position (p- position
-- 
2.11.4.GIT