X-Git-Url: http://wagner.pp.ru/gitweb/?a=blobdiff_plain;f=tcl_tests%2Freq-newkey.try;h=634e0dfabb3ed9674ae4618a56244970d7ced8d7;hb=265d89dcbce7fce4fa2b560b70597132fd8eb3b2;hp=7664a36a166867285d281da6dd9412f30830f497;hpb=4d484e7d55987e87256563a7c2c5148fb6bb8aa2;p=openssl-gost%2Fengine.git

diff --git a/tcl_tests/req-newkey.try b/tcl_tests/req-newkey.try
index 7664a36..634e0df 100644
--- a/tcl_tests/req-newkey.try
+++ b/tcl_tests/req-newkey.try
@@ -1,7 +1,7 @@
 #!/usr/bin/tclsh
 if {[info exists env(PKG_PATH)]} {
 	lappend auto_path $env(PKG_PATH)
-} else {	
+} else {
 	lappend auto_path [file dirname [info script]]
 }
 package require ossltest
@@ -65,7 +65,7 @@ gost2012_512:RSAencryption: "Недопустимое имя объекта" 1 i
 		"no_param_set" { set result $no_param_set }
 		"invalid_paramset" { set result $invalid_paramset }
 	}
-	
+
 	set index [string first ":" $alg]
 	if {$index != -1} {
 		set algname [string range $alg 0 [expr $index-1]]
@@ -90,11 +90,11 @@ gost2012_512:RSAencryption: "Недопустимое имя объекта" 1 i
 		asn::asnGetSequence seq2 seq3
 		asn::asnGetObjectIdentifier seq3 oid
 		join $oid .
-	} $code $result	
+	} $code $result
 	log "errorInfo: $errorInfo"
 
 	test -skip {![file exists test.req]} "Заявка подписана корректно" {
 		grep "verif" [openssl "req -verify -in test.req"]
-	} 0 "verify OK\n"
+	} 0 "Certificate request self-signature verify OK\n"
 }
 end_tests