--------------------------------------------------------------------------------
-- Title:               LWFormSubmit.lua
-- Description:         Like a square peg in a round hole
-- Author:              Raphaël Szwarc http://alt.textdrive.com/lua/
-- Creation Date:       February 1, 2005
-- Legal:               Copyright (C) 2005 Raphaël Szwarc
--------------------------------------------------------------------------------

-- import dependencies
local LWFormInput = require( "LWFormInput" )
local LWStyle = require( "LWStyle" )
local LWString = require( "LWString" )
local LUList = require( "LUList" )

-- define the class
local super = LWFormInput
local self = super()

function self:prefix()
        return "submit."
end

function self:type()
        return "submit"
end

function self:name()
        return self:prefix() .. ( self:bindings():get( "name" ) or self:type() )
end

function self:value()
        local aValue = self:bindings():get( "value" ) or "Submit"
        
        aValue = LWString:encode( aValue )
        
        return aValue or ""
end

-- method for string representation
function self:toString()
        local aBuffer = LUList()
        local aStyle = LWStyle:styleWithComponent( self )

        aBuffer:add( "<input " )
        aBuffer:add( ( "type = \"%s\" " ):format( self:type() ) )
        aBuffer:add( ( "name = \"%s\" " ):format( self:name() ) )
        aBuffer:add( ( "value = \"%s\" " ):format( self:value() ) )
        
        if self:isDisabled() == true then
                aBuffer:add( "disabled " )
        end

        if aStyle ~= nil then
                aBuffer:add( aStyle )
        end
        
        aBuffer:add( ">" )
           
        return aBuffer:join( "" ) 
end

return self