From 0e20656a87e8e6277fa8ef1795f8de139b801f82 Mon Sep 17 00:00:00 2001
From: "Robert P. Goldman" <rpgoldman@gmail.com>
Date: Tue, 21 Jan 2014 17:48:05 -0600
Subject: [PATCH] Tidied up the format control strings for errors.

---
 action.lisp | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/action.lisp b/action.lisp
index efcb6487..157f88a6 100644
--- a/action.lisp
+++ b/action.lisp
@@ -223,9 +223,7 @@ OPERATION objects."))
             :finally (return nil))
     (error 'operation-definition-error
            :format-control
-           "No dependency propagating scheme specified for operation ~a.~
-This is likely because the OPERATION subclass of this object has not been ~
-updated for ASDF 3."
+           "No dependency propagating scheme specified for operation ~a. This is likely because the OPERATION subclass of this object has not been updated for ASDF 3."
            :format-arguments (list obj))))
 
 (defmethod initialize-instance :before ((obj non-propagating-operation) &key)
@@ -237,8 +235,7 @@ updated for ASDF 3."
             :finally (return nil))
     (error 'operation-definition-error
            :format-control
-           "Inconsistent class: ~a No class should have both NON-PROPAGATING-OPERATION and a propagating 
-operation class as superclasses."
+           "Inconsistent class: ~a. No class should have both NON-PROPAGATING-OPERATION and a propagating operation class as superclasses."
            :format-arguments
            (list
             (class-name (class-of obj))))))
-- 
GitLab