- acs_sc::impl::get_id:

Now returns an empty value instead of causing an error

- acs_sc::impl::get_id:
Now returns an empty value instead of causing an error
6a643da9 · Frank Bergmann · 9956713a · 6a643da9
Commit 6a643da9 authored Jan 24, 2013 by Frank Bergmann
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

implementation-procs.tcl tcl/implementation-procs.tcl +2 -2

No files found.
--- a/tcl/implementation-procs.tcl
+++ b/tcl/implementation-procs.tcl
@@ -148,9 +148,9 @@ ad_proc -public acs_sc::impl::get_id {
    if the contract is not specified.
 } {
    if {[exists_and_not_null contract]} {
-        return [db_string select_impl_id_with_contract {}]
+        return [db_string select_impl_id_with_contract {} -default ""]
    } else {
-        return [db_string select_impl_id {}]
+        return [db_string select_impl_id {} -default ""]
    }
 }