Forgot to put the previous (v)snprintf commit inside '#ifdef __cplusplus' which

[wxWidgets.git] / build / script / word_macro.txt

' This is saved as word macros; opens a pdf and writes out a ps file using
' laserjet ps driver
' Note that the input and output directories are hard coded and the output dir must exist


Sub wx_ps()

    do_ps "C:\wx\wxWidgets\docs\pdf\", "wx"
    do_ps "C:\wx\wxWidgets\contrib\docs\latex\svg", "svg"
    do_ps "C:\wx\wxWidgets\contrib\docs\latex\ogl", "ogl"
    do_ps "C:\wx\wxWidgets\contrib\docs\latex\mmedia", "mmedia"
    do_ps "C:\wx\wxWidgets\contrib\docs\latex\gizmos", "gizmos"
    do_ps "C:\wx\wxWidgets\contrib\docs\latex\fl", "fl"
    do_ps "C:\wx\wxWidgets\utils\tex2rtf\docs", "tex2rtf"

    bye_bye
End Sub

Sub do_ps(mydir, myfile)
' wx_ps Macro
' Macro recorded 04/05/2005 by cje2
'
    ChangeFileOpenDirectory mydir
    Documents.Open FileName:=myfile & ".rtf", ConfirmConversions:=False, ReadOnly:= _
        False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
        "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
        Format:=wdOpenFormatAuto
        ActivePrinter = "\\biolpc22\laserjet"
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
        Collate:=True, Background:=False, PrintToFile:=True, PrintZoomColumn:=0, _
        PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0, _
        OutputFileName:="C:\daily\in\" & myfile & ".ps", Append:=False
    ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges

End Sub