fix path

1 files changed, 4 insertions, 0 deletions

diff --git a/xdcc.pl b/xdcc.pl
index 9d6717d..5ba18f2 100755
--- a/xdcc.pl
+++ b/xdcc.pl
@@ -187,6 +187,10 @@ sub xdcc_report {
 }
 sub xdcc_add {
 	my ($path, $desc) = @_;
+	if ($path[0] == "~") {
+		$path =~ s/^~//;
+		$path = $ENV{"HOME"} . $path;
+	}
 	if (! -e $path) {
 		Irssi::printformat(MSGLEVEL_CLIENTCRAP, 'xdcc_file_not_found');
 		return;