Dcr_DIAG.xml

<Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/
 http://wowprogramming.com/FrameXML/UI.xsd">
    <!--
    This file is part of Decursive.

    Decursive (v @project-version@) add-on for World of Warcraft UI
    Copyright (C) 2006-2025 John Wellesz (Decursive AT 2072productions.com) ( http://www.2072productions.com/to/decursive.php )

    Decursive is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    Decursive is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with Decursive.  If not, see <https://www.gnu.org/licenses/>.


    Decursive is inspired from the original "Decursive v1.9.4" by Patrick Bohnet (Quu).
    The original "Decursive 1.9.4" is in public domain ( www.quutar.com )

    Decursive is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY.
    -->

    <Script>

        local T = DecursiveRootTable or {};

        -- big ugly scary fatal error message display function {{{


        if not T._FatalError then
        -- the beautiful error popup : {{{ -
        StaticPopupDialogs["DECURSIVE_ERROR_FRAME"] = {
        text = "|cFFFF0000Decursive Error:|r\n%s",
        button1 = "OK",
        OnAccept = function()
        return false;
        end,
        timeout = 0,
        whileDead = 1,
        hideOnEscape = 1,
        showAlert = 1,
        }; -- }}}
        T._FatalError = function (TheError) StaticPopup_Show ("DECURSIVE_ERROR_FRAME", TheError); end
        end
        -- }}}
        if not T._LoadedFiles or not T._LoadedFiles["Dcr_DIAG.lua"] then
            if not DecursiveInstallCorrupted then T._FatalError("Decursive installation is corrupted! (Dcr_DIAG.lua not loaded)"); end;
            DecursiveInstallCorrupted = true;
            return;
        end
    </Script>

    <Frame name="DecursiveBackDropTemplate"  mixin="DecursiveTemplateMixin" virtual="true">
        <Scripts>
            <OnLoad method="OnBackdropLoaded"/>
            <OnSizeChanged method="OnBackdropSizeChanged"/>
        </Scripts>
    </Frame>

    <!-- =================The DEBUGGING FRAME======================= {{{ -->
    <!-- Inspired from BugSack error report frame-->

    <Frame name="DecursiveDebuggingFrame" parent="UIParent" inherits="DialogBoxFrame" hidden="true">

        <Scripts>
            <OnLoad>
                self:SetBackdrop(DecursiveRootTable._C.UI_BACKDROP)
            </OnLoad>
        </Scripts>
        <Size>
            <AbsDimension x="500" y="400"/>
        </Size>
        <Layers>
            <Layer level="ARTWORK">
                <FontString name="DecursiveDEBUGtext" inherits="GameFontHighlight">
                    <Anchors>
                        <Anchor point="TOP">
                            <Offset> <AbsDimension x="5" y="-5" /> </Offset>
                        </Anchor>
                    </Anchors>
                </FontString>
            </Layer>
        </Layers>
        <Frames>
            <ScrollFrame name="DecursiveDebuggingFrameScroll" inherits="UIPanelScrollFrameTemplate" toplevel="true">
                <Anchors>
                    <Anchor point="TOP" relativePoint="BOTTOM" relativeTo="DecursiveDEBUGtext">
                        <Offset>
                            <AbsDimension x="0" y="-10"/>
                        </Offset>
                    </Anchor>
                    <Anchor point="BOTTOM" relativePoint="TOP" relativeTo="DecursiveDebuggingFrameButton">
                        <Offset>
                            <AbsDimension x="0" y="10"/>
                        </Offset>
                    </Anchor>
                    <Anchor point="LEFT">
                        <Offset>
                            <AbsDimension x="5" y="0"/>
                        </Offset>
                    </Anchor>
                    <Anchor point="RIGHT">
                        <Offset>
                            <AbsDimension x="-30" y="0"/>
                        </Offset>
                    </Anchor>
                </Anchors>
                <ScrollChild>
                    <EditBox name="DecursiveDebuggingFrameText" letters="99999" multiLine="true" autoFocus="true" enableMouse="true" >
                        <Size>
                            <AbsDimension x="450" y="314"/>
                        </Size>
                        <FontString inherits="ChatFontNormal"/>
                        <Scripts>
                            <OnLoad>
                                self:SetAutoFocus(false)
                            </OnLoad>
                            <OnShow>
                                self:SetFocus()
                            </OnShow>
                            <OnTextChanged>
                                DecursiveRootTable._DebugFrameOnTextChanged(self)
                            </OnTextChanged>
                            <OnEscapePressed>
                                self:ClearFocus()
                            </OnEscapePressed>
                        </Scripts>
                    </EditBox>
                </ScrollChild>
            </ScrollFrame>
        </Frames>
    </Frame>

    <!-- ================================================================== }}} -->

    <Script>
        local T = DecursiveRootTable or {};

        T._LoadedFiles["Dcr_DIAG.xml"] = "@project-version@";
    </Script>
</Ui>