*** /tmp/,RCSt1000067	Sat Feb 10 16:33:30 1996
--- kerberos.c	Sat Feb 10 16:04:38 1996
***************
*** 265,270 ****
--- 265,271 ----
        bzero (master_key_schedule, sizeof (master_key_schedule));
        exit (-1);
      }
+     des_init_random_number_generator(master_key);
  
      master_key_version = (u_char) kerror;
  
***************
*** 440,446 ****
  	    bzero(session_key, sizeof(C_Block));
  #else
  	    /* random session key */
! 	    random_key(session_key);
  #endif
  
  	    /* unseal server's key from master key */
--- 441,447 ----
  	    bzero(session_key, sizeof(C_Block));
  #else
  	    /* random session key */
! 	    des_new_random_key(session_key);
  #endif
  
  	    /* unseal server's key from master key */
***************
*** 577,583 ****
  	    bzero(session_key, sizeof(C_Block));
  #else
  	    /* random session key */
! 	    random_key(session_key);
  #endif
  
  	    krb_create_ticket(tk, k_flags, ad->pname, ad->pinst,
--- 578,584 ----
  	    bzero(session_key, sizeof(C_Block));
  #else
  	    /* random session key */
! 	    des_new_random_key(session_key);
  #endif
  
  	    krb_create_ticket(tk, k_flags, ad->pname, ad->pinst,