1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
|
Description: fix some spelling mistakes
Origin: vendor
Bug: https://rt.cpan.org/Ticket/Display.html?id=89799
Forwarded: https://rt.cpan.org/Ticket/Display.html?id=89799
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2014-05-10
--- a/lib/Text/vCard.pm
+++ b/lib/Text/vCard.pm
@@ -193,7 +193,7 @@
}
);
- # get all phone number that matches serveral types
+ # get all phone number that matches several types
my @types = qw(work home);
my $nodes = $vcard->get(
{ 'node_type' => 'tel',
@@ -208,7 +208,7 @@
Supplied with a scalar or an array ref the methods
return a list of nodes of a type, where relevant. If any
-of the elements is the prefered element it will be
+of the elements is the preferred element it will be
returned as the first element of the list.
=cut
@@ -234,7 +234,7 @@
If multiple elements match, then only the first is returned. If the object
isn't found, or doesn't have a simple value, then undef is returned.
-The argument type may be ommitted, it can be a scalar, or it can be an
+The argument type may be omitted, it can be a scalar, or it can be an
array reference if multiple types are selected.
=cut
@@ -341,7 +341,7 @@
}
This method takes one or two arguments. The group name
-(accessable on any node object by using $node->group() - not
+(accessible on any node object by using $node->group() - not
all nodes will have a group, indeed most vcards do not seem
to use it) and optionally the types of node you with to
have returned.
@@ -478,7 +478,7 @@
return undef unless scalar(@to_return);
- # Make prefered value first
+ # Make preferred value first
@to_return = sort { _sort_prefs($b) <=> _sort_prefs($a) } @to_return;
return wantarray ? @to_return : \@to_return;
|
