From b4421906c53be1fadade13752d521c33456b5d31 Mon Sep 17 00:00:00 2001 From: Bert Burgemeister Date: Wed, 6 Jun 2012 17:33:09 +0200 Subject: [PATCH] Complain properly when recreating an existing acquisition project --- db-tables.lisp | 8 +++----- phoros.asd | 2 +- 2 files changed, 4 insertions(+), 6 deletions(-) diff --git a/db-tables.lisp b/db-tables.lisp index 972dd37..02d3b99 100644 --- a/db-tables.lisp +++ b/db-tables.lisp @@ -1327,11 +1327,9 @@ common-table-name." (cl-postgres-error:syntax-error-or-access-violation () nil)) (assert-phoros-db-major-version) (when (select-dao 'sys-acquisition-project - (:= 'common-table-name - (s-sql:to-sql-name common-table-name))) - (error "There is already a row with a common-table-name of ~A in table ~A." - common-table-name - (s-sql:to-sql-name (dao-table-name 'sys-acquisition-project)))) + (:= 'common-table-name common-table-name)) + (error "There is already an acquisition project by the name of ~A." + common-table-name)) (create-table 'point-data) (create-table 'image-data) (create-aggregate-view common-table-name) diff --git a/phoros.asd b/phoros.asd index 840e93c..b60d7a1 100644 --- a/phoros.asd +++ b/phoros.asd @@ -21,7 +21,7 @@ it available over a web interface." ;; There should be a corresponding git tag which marks the point this ;; version number becomes official. - "13.7.0" + "13.7.1" :licence ;goes with --licence output "Copyright (C) 2010, 2011, 2012 Bert Burgemeister -- 2.11.4.GIT