diff options
author | David Phillips <david@sighup.nz> | 2019-03-31 18:55:30 +1300 |
---|---|---|
committer | David Phillips <david@sighup.nz> | 2019-03-31 18:55:30 +1300 |
commit | a2390fa651ed4d51d885b0f306ffceb8b3752a0c (patch) | |
tree | 0373e71497a9c8c97339194f26b79c575a9fb2a0 /Plugin/Convert.pm | |
parent | bd41125e23566df40bc2e62e16a3c01a302c3944 (diff) | |
download | idalius-a2390fa651ed4d51d885b0f306ffceb8b3752a0c.tar.xz |
Convert: Don't append new lines to ret val
Diffstat (limited to 'Plugin/Convert.pm')
-rwxr-xr-x | Plugin/Convert.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Plugin/Convert.pm b/Plugin/Convert.pm index 8d21457..e5f37e1 100755 --- a/Plugin/Convert.pm +++ b/Plugin/Convert.pm @@ -52,20 +52,20 @@ sub convert { my $from = (split / to /, $rest)[0]; my $to = (split / to /, $rest)[1]; - return "Syntax: convert <from> [to <to>]\n" unless ($from); + return "Syntax: convert <from> [to <to>]" unless ($from); my $converted = convert_common($from, $to); - return "Define $from: $converted\n" unless $to; - return "Convert $from -> $to: $converted\n"; + return "Define $from: $converted" unless $to; + return "Convert $from -> $to: $converted"; } sub define { my ($self, $irc, $logger, $who, $where, $ided, $rest, $no_reenter, @arguments) = @_; - return "Syntax: define [unit/expression]\n" unless ($rest); + return "Syntax: define [unit/expression]" unless ($rest); my $defn = convert_common($rest, undef); - return "Define $rest: $defn\n"; + return "Define $rest: $defn"; } 1; |