1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
9 * This file incorporates work covered by the following license notice:
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
21 #include <xmlscript/xmlmod_imexp.hxx>
22 #include <xmlscript/xml_helper.hxx>
24 using namespace com::sun::star::uno
;
25 using namespace com::sun::star
;
31 //==================================================================================================
34 SAL_CALL
exportScriptModule(
35 Reference
< xml::sax::XWriter
> const & xOut
,
36 const ModuleDescriptor
& rMod
)
37 SAL_THROW( (Exception
) )
39 xOut
->startDocument();
42 "<!DOCTYPE script:module PUBLIC \"-//OpenOffice.org//DTD OfficeDocument 1.0//EN\""
44 xOut
->unknown( aDocTypeStr
);
45 xOut
->ignorableWhitespace( OUString() );
47 OUString
aModuleName( XMLNS_SCRIPT_PREFIX
":module" );
48 XMLElement
* pModElement
= new XMLElement( aModuleName
);
49 Reference
< xml::sax::XAttributeList
> xAttributes( pModElement
);
51 pModElement
->addAttribute( "xmlns:" XMLNS_SCRIPT_PREFIX
, XMLNS_SCRIPT_URI
);
53 pModElement
->addAttribute( XMLNS_SCRIPT_PREFIX
":name", rMod
.aName
);
54 pModElement
->addAttribute( XMLNS_SCRIPT_PREFIX
":language", rMod
.aLanguage
);
55 if( !rMod
.aModuleType
.isEmpty() )
56 pModElement
->addAttribute( XMLNS_SCRIPT_PREFIX
":moduleType", rMod
.aModuleType
);
58 xOut
->ignorableWhitespace( OUString() );
59 xOut
->startElement( aModuleName
, xAttributes
);
60 xOut
->characters( rMod
.aCode
);
61 xOut
->endElement( aModuleName
);
67 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */