Robert Hernandez wrote:
% Hi,
Hi Robert,
% The following patch fixes the error from nextval when a re-activation
% key is generated in Spacewalk 1.5 Postgresql84. Thank you Jan for
% pointing me the in right direction!
%
%
% Error message:
%
% RHN::Exception: DBD::Pg::st execute failed: ERROR: missing
% FROM-clause entry for table "rhn_reg_token_seq" at character 8
% RHN::DB /usr/lib/perl5/vendor_perl/5.8.8/RHN/DB.pm 228
% RHN::Exception::DB::throw
% RHN::DB::Token /usr/lib/perl5/vendor_perl/5.8.8/RHN/DB/Token.pm 430
% RHN::DB::handle_error
%
% Patch:
%
% --- a/usr/lib/perl5/vendor_perl/5.8.8/RHN/DB/Token.pm 2011-08-05
% 12:18:52.000000000 -0700
% +++ b/usr/lib/perl5/vendor_perl/5.8.8/RHN/DB/Token.pm 2011-08-05
% 11:58:59.000000000 -0700
% @@ -426,7 +426,7 @@
%
% my $dbh = $trans || RHN::DB->connect;
%
% if ($self->id == -1) {
% - my $sth = $dbh->prepare("SELECT sequence_nextval('rhn_reg_token_seq')");
% + my $sth = $dbh->prepare("SELECT rhn_reg_token_seq.nextval FROM DUAL");
% $sth->execute;
% my ($id) = $sth->fetchrow;
% die "No new token id from seq rhn_reg_token_seq (possible error:
% " . $sth->errstr . ")" unless $id;
commited the fix as 2cec4e439e2f64a75b5564656c3761d0a85357ce.
Thanks for it.
Fixed package is spacewalk-base-1.6.9-1.
Regards,
--
Michael Mráka
Satellite Engineering, Red Hat
_______________________________________________
Spacewalk-devel mailing list
Spacewalk-devel@redhat.com
https://www.redhat.com/mailman/listinfo/spacewalk-devel
