Use correct digest when exporting keying material. PR#3319

diff --git a/ssl/t1_enc.c b/ssl/t1_enc.c
index 52fd329..ab86e7e 100644
--- a/ssl/t1_enc.c
+++ b/ssl/t1_enc.c

@@ -1218,7 +1218,7 @@
 	if (memcmp(val, TLS_MD_KEY_EXPANSION_CONST,
 		 TLS_MD_KEY_EXPANSION_CONST_SIZE) == 0) goto err1;
 
-	rv = tls1_PRF(s->s3->tmp.new_cipher->algorithm2,
+	rv = tls1_PRF(ssl_get_algorithm2(s),
 		      val, vallen,
 		      NULL, 0,
 		      NULL, 0,