blob: baac9d3472fa76d523a8617aca05377bce4c62bb (
plain)
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
|
From 63d5a65a267c75b266ac41ff583659ed86c4b509 Mon Sep 17 00:00:00 2001
From: Andrea Fagiani <andfagiani@gmail.com>
Date: Mon, 18 Apr 2016 16:48:11 +0200
Subject: [PATCH] xfreerdp method: fix syntax for drive redirection
---
lib/method/PACMethod_xfreerdp.pm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lib/method/PACMethod_xfreerdp.pm b/lib/method/PACMethod_xfreerdp.pm
index 622c830..02adf90 100644
--- a/lib/method/PACMethod_xfreerdp.pm
+++ b/lib/method/PACMethod_xfreerdp.pm
@@ -221,7 +221,7 @@ sub _parseCfgToOptions {
$opt =~ /^\+fonts$/go and $hash{fontSmooth} = 1;
$opt =~ /^-grab-keyboard$/go and $hash{noGrabKbd} = 1;
- while ( $opt =~ /^drive:(.+):(.+)/go )
+ while ( $opt =~ /^drive:(.+),(.+)/go )
{
my %redir;
$redir{redirDiskShare} = $1;
@@ -266,7 +266,7 @@ sub _parseOptionsToCfg {
$txt .= ' +fonts' if $$hash{fontSmooth};
$txt .= ' -grab-keyboard' if $$hash{noGrabKbd};
- foreach my $redir ( @{ $$hash{redirDisk} } ) { $txt .= " /drive:$$redir{redirDiskShare}:$$redir{redirDiskPath}"; }
+ foreach my $redir ( @{ $$hash{redirDisk} } ) { $txt .= " /drive:$$redir{redirDiskShare},$$redir{redirDiskPath}"; }
return $txt;
}
|