diff --git a/scratch/ocrimport/MyListener.cxx b/scratch/ocrimport/MyListener.cxx
index 50e6947..38b7aa6 100644
--- a/scratch/ocrimport/MyListener.cxx
+++ b/scratch/ocrimport/MyListener.cxx
@@ -37,22 +37,15 @@
 
 namespace css = ::com::sun::star;
 
-/*-----------------------------------------------------
-	20.11.2003 11:31
------------------------------------------------------*/
+
 MyListener::MyListener(const css::uno::Reference< css::lang::XMultiServiceFactory >& xSMGR)
 	: m_xSMGR(xSMGR)
 {}
 
-/*-----------------------------------------------------
-	20.11.2003 11:32
------------------------------------------------------*/
+
 MyListener::~MyListener()
 {}
 
-/*-----------------------------------------------------
-    20.11.2003 12:04
------------------------------------------------------*/
 css::uno::Any SAL_CALL MyListener::execute(const css::uno::Sequence< css::beans::NamedValue >& lArguments)
 	throw (css::lang::IllegalArgumentException,
 		   css::uno::Exception,
@@ -107,8 +100,8 @@ css::uno::Any SAL_CALL MyListener::execute(const css::uno::Sequence< css::beans:
                         !xInfo->supportsService(::rtl::OUString::createFromAscii("com.sun.star.text.GlobalDocument"))
                        );
 
-    // Wir interessieren uns nur für Writer und Calc. Werden hier aber für
-    // alle neu geöffneten Dokumente benachrichtigt ...
+    // We are interested only in Writer and Calc
+    // Werden hier aber füralle neu geöffneten Dokumente benachrichtigt ...
     if (!bCalc && !bWriter)
 		return css::uno::Any();
 
@@ -127,18 +120,12 @@ css::uno::Any SAL_CALL MyListener::execute(const css::uno::Sequence< css::beans:
 	return css::uno::Any();
 }
 
-/*-----------------------------------------------------
-    20.11.2003 12:13
------------------------------------------------------*/
 ::rtl::OUString SAL_CALL MyListener::getImplementationName()
     throw (css::uno::RuntimeException)
 {
     return ::rtl::OUString::createFromAscii(MYLISTENER_IMPLEMENTATIONNAME);
 }
 
-/*-----------------------------------------------------
-    20.11.2003 12:13
------------------------------------------------------*/
 css::uno::Sequence< ::rtl::OUString > SAL_CALL MyListener::getSupportedServiceNames()
     throw (css::uno::RuntimeException)
 {
@@ -147,9 +134,6 @@ css::uno::Sequence< ::rtl::OUString > SAL_CALL MyListener::getSupportedServiceNa
     return lNames;
 }
 
-/*-----------------------------------------------------
-    20.11.2003 12:14
------------------------------------------------------*/
 sal_Bool SAL_CALL MyListener::supportsService(const ::rtl::OUString& sServiceName)
     throw (css::uno::RuntimeException)
 {
@@ -159,9 +143,6 @@ sal_Bool SAL_CALL MyListener::supportsService(const ::rtl::OUString& sServiceNam
            );
 }
 
-/*-----------------------------------------------------
-	20.11.2003 11:31
------------------------------------------------------*/
 css::uno::Reference< css::uno::XInterface > MyListener::st_createInstance(const css::uno::Reference< css::lang::XMultiServiceFactory >& xSMGR)
 {
 	MyListener* pListener = new MyListener(xSMGR);
diff --git a/scratch/ocrimport/MyProtocolHandler.cxx b/scratch/ocrimport/MyProtocolHandler.cxx
index 570d1bf..d8b9a53 100644
--- a/scratch/ocrimport/MyProtocolHandler.cxx
+++ b/scratch/ocrimport/MyProtocolHandler.cxx
@@ -88,40 +88,6 @@ using namespace com::sun::star::ui::dialogs;
 
 ListenerHelper aListenerHelper;
 
-
-
-/*void ShowMessageBox( const Reference< XToolkit >& rToolkit, 
-               const Reference< XFrame >& rFrame, const ::rtl::OUString& aTitle, const ::rtl::OUString &aMsgText )
-{
-    if ( rFrame.is() && rToolkit.is() )
-    {
-        // describe window properties.
-        WindowDescriptor                aDescriptor;
-        aDescriptor.Type              = WindowClass_MODALTOP;
-        aDescriptor.WindowServiceName = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "infobox" ));
-        aDescriptor.ParentIndex       = -1;
-        aDescriptor.Parent            = Reference< XWindowPeer >
-						( rFrame->getContainerWindow(), UNO_QUERY );
-        aDescriptor.Bounds            = Rectangle(300,200,300,200);
-        aDescriptor.WindowAttributes  = WindowAttribute::BORDER | 
-                                          WindowAttribute::MOVEABLE | WindowAttribute::CLOSEABLE;
- 
-        Reference< XWindowPeer > xPeer = rToolkit->createWindow( aDescriptor );
-        if ( xPeer.is() )
-        {
-            Reference< XMessageBox > xMsgBox( xPeer, UNO_QUERY );
-            if ( xMsgBox.is() )
-            {
-                xMsgBox->setCaptionText( aTitle );
-                xMsgBox->setMessageText( aMsgText );
-                xMsgBox->execute();
-            }
-        }
-    }
-}
-*/
-
-
 oslFileError readLine( oslFileHandle pFile, ::rtl::OStringBuffer& line )
 {
     OSL_PRECOND( line.getLength() == 0, "line buf not empty" );