projects
/
licom.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fixed problem with incorrect formatted vCards
[licom.git]
/
licom.cgi
diff --git
a/licom.cgi
b/licom.cgi
index
5abb2e6
..
40bb8a3
100755
(executable)
--- a/
licom.cgi
+++ b/
licom.cgi
@@
-479,6
+479,8
@@
EOF
my $print = defined ($FieldNames{$field}) ? $FieldNames{$field} : $field;
my @values = @{$contacts->{$field}};
my $print = defined ($FieldNames{$field}) ? $FieldNames{$field} : $field;
my @values = @{$contacts->{$field}};
+ next if (!$UserID and $field eq 'group');
+
push (@values, '');
for (@values)
push (@values, '');
for (@values)
@@
-606,6
+608,8
@@
sub action_update
{
my $field = $_;
{
my $field = $_;
+ next if (!$UserID and $field eq 'group');
+
if (defined ($contacts->{$field}))
{
my $values = $contacts->{$field};
if (defined ($contacts->{$field}))
{
my $values = $contacts->{$field};
@@
-667,6
+671,8
@@
EOF
my $vc_fld = $vcard_types{$field};
my $values = $person->get ($field);
my $vc_fld = $vcard_types{$field};
my $values = $person->get ($field);
+ next unless ($vc_fld);
+
for (@$values)
{
my $value = $_;
for (@$values)
{
my $value = $_;