public function testListBullet()
{
$oPhpPresentation = new PhpPresentation();
$oSlide = $oPhpPresentation->getActiveSlide();
$oRichText = $oSlide->createRichTextShape();
$oRichText->getActiveParagraph()->getBulletStyle()->setBulletType(Bullet::TYPE_BULLET);
$oRichText->getActiveParagraph()->getBulletStyle()->setBulletColor(new Color('76543210'));
$oExpectedFont = $oRichText->getActiveParagraph()->getBulletStyle()->getBulletFont();
$oExpectedChar = $oRichText->getActiveParagraph()->getBulletStyle()->getBulletChar();
$oExpectedColor = $oRichText->getActiveParagraph()->getBulletStyle()->getBulletColor()->getRGB();
$oExpectedAlpha = $oRichText->getActiveParagraph()->getBulletStyle()->getBulletColor()->getAlpha();
$oExpectedAlpha *= 1000;
$oRichText->createTextRun('Alpha');
$oRichText->createParagraph()->createTextRun('Beta');
$oRichText->createParagraph()->createTextRun('Delta');
$oRichText->createParagraph()->createTextRun('Epsilon');
$pres = TestHelperDOCX::getDocument($oPhpPresentation, 'PowerPoint2007');
$element = '/p:sld/p:cSld/p:spTree/p:sp/p:txBody/a:p/a:pPr';
$this->assertTrue($pres->elementExists($element . '/a:buFont', 'ppt/slides/slide1.xml'));
$this->assertEquals($oExpectedFont, $pres->getElementAttribute($element . '/a:buFont', 'typeface', 'ppt/slides/slide1.xml'));
$this->assertTrue($pres->elementExists($element . '/a:buChar', 'ppt/slides/slide1.xml'));
$this->assertEquals($oExpectedChar, $pres->getElementAttribute($element . '/a:buChar', 'char', 'ppt/slides/slide1.xml'));
$this->assertTrue($pres->elementExists($element . '/a:buClr', 'ppt/slides/slide1.xml'));
$this->assertTrue($pres->elementExists($element . '/a:buClr/a:srgbClr', 'ppt/slides/slide1.xml'));
$this->assertEquals($oExpectedColor, $pres->getElementAttribute($element . '/a:buClr/a:srgbClr', 'val', 'ppt/slides/slide1.xml'));
$this->assertTrue($pres->elementExists($element . '/a:buClr/a:srgbClr/a:alpha', 'ppt/slides/slide1.xml'));
$this->assertEquals($oExpectedAlpha, $pres->getElementAttribute($element . '/a:buClr/a:srgbClr/a:alpha', 'val', 'ppt/slides/slide1.xml'));
}