diff options
Diffstat (limited to 'web')
| -rwxr-xr-x | web/api/write/switches | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/web/api/write/switches b/web/api/write/switches index 1f91d48..e0ee950 100755 --- a/web/api/write/switches +++ b/web/api/write/switches @@ -63,6 +63,11 @@ foreach my $tmp2 (@tmp) { } else { %placement = %{convertplace($switch{'placement'})}; } + if (defined($switch{'tags'})) { + # MY GOD I HATE THIS + # But I'm too lazy to improve it more for now. + $switch{'tags'} = "[". join(",", map { "\"".$_."\"" } @{$switch{'tags'}})."]"; + } my ($x1,$x2,$y1,$y2); $x1 = $placement{'x1'}; $y1 = $placement{'y1'}; |