glife/locations/cleanHTML.qsrc

#cleanHTML
!Removes Whitespace from between HTML tags in a string.
!	Purpose is because having whitespace in writing code makes readablility,
!	but the rendering engine adds extra lines at top for no reason.
!
!	$ARGS[0] = is the string to be cleaned up.
!
!	Call this as a Function to get the cleaned string returned
!	example:
!		*pl func('cleanHTML', $HTMLString)

$HTMLString = $ARGS[0]

:cleanHTMLloop
$BadStr = STRFIND($HTMLString, '\>\s+\<', 0)
if $BadStr ! "":
	$HTMLString = REPLACE( $HTMLString , $BadStr , "><" )
	jump 'cleanHTMLloop'
end

$result = $HTMLString

killvar '$HTMLString'
killvar '$BadStr'

--- cleanHTML ---------------------------------