#!/bin/sh
#\
exec tclsh "$0" "$@"

cd [file dirname [info script]]
source ../ooxml.tcl
source ../ooxml-docx.tcl
source strings.tcl
namespace import ::ooxml::docx::docx
set docx [docx new]
featuresCovered "Inport styles"
$docx import styles docx-example4-in.docx
$docx paragraph "Heading" -pstyle "Heading"
$docx paragraph $loreipsum

$docx write docx-example4.docx
$docx destroy
