[openca-cvsdev] CVS: openca-0.9/src/common/lib/cmds genSKey,1.5,1.6

[<ope...@li...>]

Update of /cvsroot/openca/openca-0.9/src/common/lib/cmds
In directory sc8-pr-cvs1:/tmp/cvs-serv24271

Modified Files:
	genSKey 
Log Message:
create a copy from the old key - patch submitted by GOTOU Yuuzou
<got...@no...>


Index: genSKey
===================================================================
RCS file: /cvsroot/openca/openca-0.9/src/common/lib/cmds/genSKey,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** genSKey	26 Nov 2002 10:33:02 -0000	1.5
--- genSKey	29 Nov 2002 07:29:31 -0000	1.6
***************
*** 23,28 ****
  
  if( -e "$cakeyFile" ) {
! 	$tools->moveFiles( "$cakeyFile", "${cakeyFile}_${$}.old" );
! 	$msg = i18nGettext ("Old key file is (__FILE__).", "__FILE__", "${cakeyFile}_${$}.old");
  }
  
--- 23,28 ----
  
  if( -e "$cakeyFile" ) {
! 	$tools->moveFiles( SRC=>"$cakeyFile", DEST=>"${cakeyFile}.${$}_old" );
! 	$msg = i18nGettext ("Old key file is (__FILE__).", "__FILE__", "${cakeyFile}.${$}_old");
  }