oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

forward porting fix for non-unique separator strings, ~~~, #8543

Browse source
This commit is contained in:
Colin Kuskie 2008-11-21 23:07:05 +00:00
parent 9eff3a4b77
commit 13eb87ffe5
13 changed files with 54 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lib/WebGUI/Asset.pm
View file

@ -1244,6 +1244,23 @@ sub getRoot {
}
#-------------------------------------------------------------------
=head2 getSeparator
Returns a very unique string that can be used for splitting head and body apart
from the style template. Made into a method in case it ever has to be changed
again.
=cut
sub getSeparator {
my $self = shift;
my $padCharacter = shift || '~';
my $pad = $padCharacter x 3;
return $pad.$self->getId.$pad
}
#-------------------------------------------------------------------
=head2 getTempspace ( session )