Changes

From SME Server
Jump to navigationJump to search
Removed notice as it should be fixed now.
Line 4: Line 4:     
[[User:Snoble|Snoble]] 18:29, 28 April 2008 (MDT)
 
[[User:Snoble|Snoble]] 18:29, 28 April 2008 (MDT)
  −
  −
I am finding that I get a perl warning from this MySQL fragment:
  −
  −
{
  −
    my $rec = $DB->get('loggerdemo')
  −
        || $DB->new_record('loggerdemo', {type => 'service'});
  −
  −
    my $password = $rec->prop('DbPassword');
  −
    return "" if $password;
  −
  −
    use MIME::Base64;
  −
  −
    my $rand    = sprintf("%08d", int(1_000_000_000 * rand()));
  −
    my $password = MIME::Base64::encode($rand, "");
  −
  −
    $rec->set_prop('DbPassword', $password);
  −
}
  −
  −
the second "my $password" "masks....." etc.
  −
  −
suggest removing the "my" on that line.
  −
  −
--[[User:Brianr|Brianr]] 04:38, 16 May 2008 (MDT)
 

Navigation menu