Unreferenced Scalar?

[Andrew Melo <an...@world-of-frags.com>]

Hey All-

I am using the perl svn bindings, and I've run across the following error:

Attempt to free unreferenced scalar: SV 0x15f5010, Perl interpreter:
0x3d464c at wof/file/slaveRepos.pm line 120.

 From reading perldiag, it appears that something is being
double-dereferenced. I've tried shifting code around and removing some
extra functionality that I had in place to clear things up, but to no
avail.

The strange thing is, the copy function throws this error while the 
delete function doesnt... Any suggestions? (I've posted the code below)

Thanks in advance-
Andrew


# args: <from> <to>
sub copy {
   my $self = shift;
   my $from = shift;
   my $to   = shift;

   our  $logger;  our  $wofconf;

   #gets a SVN client object
   my $ctx        = _getClient();
   my $reposPath  = $wofconf->getSVNRepos();

   my  (@retval)  =  $ctx->copy($reposPath  .  $from,  'HEAD',
                   $reposPath  .  $to);
   # below is line 120
   my  @retinfo  =  parseClientCommitInfo(@retval);
   1;
}

#snip#
sub delete {
   my $self = shift;
   my $del = shift;
   our $logger; our $wofconf;

   $logger->debug("reposDel: dir: ".$wofconf->getSVNRepos() . $del);

   my $ctx       = _getClient();
   $ctx->delete([$wofconf->getSVNRepos() . $del],1);
}

#snip#
sub logCallback {
   our $logger;
   my $logmsg = "testing log message";
   $_[0] = \$logmsg;
}

---------------------------------------------------------------------
To unsubscribe, e-mail: users-unsubscribe@subversion.tigris.org
For additional commands, e-mail: users-help@subversion.tigris.org