From f65c7d9218346a20557a5d2bd8dbac7a7b0d5844 Mon Sep 17 00:00:00 2001
From: notnac <32044623+notnac@users.noreply.github.com>
Date: Wed, 22 Nov 2023 20:44:04 +0000
Subject: [PATCH] added missing encode of --tag-only-filename value

Closes #448
---
 get_iplayer | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/get_iplayer b/get_iplayer
index f37c912e..0310422d 100755
--- a/get_iplayer
+++ b/get_iplayer
@@ -3987,7 +3987,7 @@ sub tag_file {
 	my $prog = shift;
 	if ( $opt->{tagonly} ) {
 		if ( $opt->{tagonlyfilename} ) {
-			$prog->{filename} = $opt->{tagonlyfilename};
+			$prog->{filename} = main::encode_fs($opt->{tagonlyfilename});
 			(undef, undef, $prog->{ext}) = fileparse($prog->{filename}, qr/\.[^.]*/);
 			$prog->{ext} =~ s/^\.//;
 		}