Diff

Differences From Artifact [ec608c91c1]:

To Artifact [6da8c360ca]:


   301    301   	set fd [open $fileName w 0600]
   302    302   	puts $fd [join $output "\n"]
   303    303   	close $fd
   304    304   }
   305    305   
   306    306   proc _listCertificates {} {
   307    307   	if {![info exists ::env(PKCS11MODULE)]} {
   308         -		return [list]
          308  +		return -code error "ERROR: PKCS11MODULE environment variable is not set to your PKCS11 module"
   309    309   	}
   310    310   
          311  +	# Hardcode some PKCS11 module workarounds
   311    312   	set ::env(CACKEY_NO_EXTRA_CERTS) 1
   312    313   
   313    314   	set handle [::pki::pkcs11::loadmodule $::env(PKCS11MODULE)]
   314    315   
   315    316   	set slotInfo [list]
   316    317   	foreach slot [::pki::pkcs11::listslots $handle] {
   317    318   		set slotID [lindex $slot 0]