diff options
| author | Francois Pons <fpons@mandriva.com> | 1999-11-18 17:21:44 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 1999-11-18 17:21:44 +0000 |
| commit | 7c32cf9c3f2c6ad9884716f67aee1a2979812de9 (patch) | |
| tree | 007b0a387ef2194ef61692bba27459b4d77fd53d /perl-install/c | |
| parent | ff92a24605af270187adee63ba306b5ecd1d6ff9 (diff) | |
| download | drakx-backup-do-not-use-7c32cf9c3f2c6ad9884716f67aee1a2979812de9.tar drakx-backup-do-not-use-7c32cf9c3f2c6ad9884716f67aee1a2979812de9.tar.gz drakx-backup-do-not-use-7c32cf9c3f2c6ad9884716f67aee1a2979812de9.tar.bz2 drakx-backup-do-not-use-7c32cf9c3f2c6ad9884716f67aee1a2979812de9.tar.xz drakx-backup-do-not-use-7c32cf9c3f2c6ad9884716f67aee1a2979812de9.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/c')
| -rw-r--r-- | perl-install/c/stuff.xs.pm | 26 |
1 files changed, 18 insertions, 8 deletions
diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm index a3317b76b..32ca98ff6 100644 --- a/perl-install/c/stuff.xs.pm +++ b/perl-install/c/stuff.xs.pm @@ -229,7 +229,12 @@ rpmdbOpenForTraversal(root) char *root CODE: static rpmdb db; + rpmErrorCallBackType old_cb; + old_cb = rpmErrorSetCallback(rpmError_callback_empty); + rpmSetVerbosity(RPMMESS_FATALERROR); RETVAL = rpmdbOpenForTraversal(root, &db) == 0 ? db : NULL; + rpmErrorSetCallback(old_cb); + rpmSetVerbosity(RPMMESS_NORMAL); OUTPUT: RETVAL @@ -392,7 +397,12 @@ int rpmdbRebuild(root) char *root CODE: + rpmErrorCallBackType old_cb; + old_cb = rpmErrorSetCallback(rpmError_callback_empty); + rpmSetVerbosity(RPMMESS_FATALERROR); RETVAL = rpmdbRebuild(root) == 0; + rpmErrorSetCallback(old_cb); + rpmSetVerbosity(RPMMESS_NORMAL); OUTPUT: RETVAL @@ -461,16 +471,16 @@ rpmRunTransactions(trans, callbackOpen, callbackClose, callbackStart, callbackPr } case RPMCALLBACK_INST_START: { - dSP ; - PUSHMARK(sp) ; - XPUSHs(sv_2mortal(newSVpv(n, 0))); - PUTBACK ; - perl_call_sv(callbackStart, G_DISCARD); - last_amount = 0; - } break; + dSP ; + PUSHMARK(sp) ; + XPUSHs(sv_2mortal(newSVpv(n, 0))); + PUTBACK ; + perl_call_sv(callbackStart, G_DISCARD); + last_amount = 0; + } break; case RPMCALLBACK_INST_PROGRESS: - if ((amount - last_amount) * 4 / total) { + if ((amount - last_amount) * 4 / total) { dSP; PUSHMARK(sp); XPUSHs(sv_2mortal(newSViv(amount))); |