/**
* Delete a version
*
*/
function do_deleteVersion()
{
$iVersionId = $_REQUEST['versionid'];
$sReason = $_REQUEST['reason'];
$oVersion = Document::get($this->oDocument->getId(), $iVersionId);
$res = KTDocumentUtil::deleteVersion($this->oDocument, $iVersionId, $sReason);
if (PEAR::isError($res)) {
$this->addErrorMessage($res->getMessage());
redirect(KTDocumentAction::getURL());
exit(0);
}
// Record the transaction
$aOptions['version'] = sprintf('%d.%d', $oVersion->getMajorVersionNumber(), $oVersion->getMinorVersionNumber());
$oDocumentTransaction =& new DocumentTransaction($this->oDocument, _kt('Document version deleted'), 'ktcore.transactions.delete_version', $aOptions);
$oDocumentTransaction->create();
redirect(KTDocumentAction::getURL());
}
