Index: openacs-4/packages/acs-service-contract/acs-service-contract.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/acs-service-contract.info,v
diff -u -r1.48 -r1.49
--- openacs-4/packages/acs-service-contract/acs-service-contract.info	5 Aug 2018 21:44:21 -0000	1.48
+++ openacs-4/packages/acs-service-contract/acs-service-contract.info	4 Oct 2018 08:53:40 -0000	1.49
@@ -7,7 +7,7 @@
     <initial-install-p>t</initial-install-p>
     <singleton-p>t</singleton-p>
     
-    <version name="5.10.0d1" url="http://openacs.org/repository/download/apm/acs-service-contract-5.10.0d1.apm">
+    <version name="5.10.0d2" url="http://openacs.org/repository/download/apm/acs-service-contract-5.10.0d2.apm">
         <owner url="http://openacs.org">OpenACS</owner>
         <summary>API and UI for service contracts</summary>
         <release-date>2017-08-06</release-date>
@@ -17,7 +17,7 @@
         Examples are the contracts used for search which provide a means to get content on a given object and to translate an object_id to a URL or the contracts used by dotlrn and new-portals to allow packages to provide portalized panes.</description>
         <license>GPL version 2</license>
 
-        <provides url="acs-service-contract" version="5.10.0d1"/>
+        <provides url="acs-service-contract" version="5.10.0d2"/>
         <requires url="acs-kernel" version="5.9.1"/>
 
         <callbacks>
Index: openacs-4/packages/acs-service-contract/tcl/implementation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/implementation-procs.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/acs-service-contract/tcl/implementation-procs.tcl	11 Jul 2018 10:37:41 -0000	1.19
+++ openacs-4/packages/acs-service-contract/tcl/implementation-procs.tcl	4 Oct 2018 08:53:40 -0000	1.20
@@ -137,19 +137,20 @@
     Retrieves the ID for a service contract.  If the contract is specified
     then the ID is retrieved for the specified contract, otherwise all
     service contract IDs will be retrieved that match the specified owner
-    and implementation name.
+    and implementation name. If nothing is found, the functons returns empty.
 
     @param owner Owner of the service contract.
     @param name Implementation name.
     @param contract Implementation contract name.
-    @return Returns the ID for a specified service contract, or all IDs for service contracts that match the owner and implementation name of
-    a service contract,
-    if the contract is not specified.
+    @return Returns the ID for a specified service contract, or all IDs for service contracts
+       that match the owner and implementation name of a service contract,
+       if the contract is not specified. If there is no such service contract, the function
+       returns empty.
 } {
     if {$contract ne ""} {
-        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 {}]
     }
 }