From a1f6016bc61aefc4a8525500da2b1567a98e1ab8 Mon Sep 17 00:00:00 2001
From: stodolapatrik <stodolapatrik@gmail.com>
Date: Mon, 26 May 2025 09:08:41 +0200
Subject: [PATCH] fix(csshx): replace deprecated POSIX::tmpnam with File::Temp
 in csshX and csshX.iterm

---
 csshX       | 5 +++--
 csshX.iterm | 5 +++--
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/csshX b/csshX
index a9d6015..7095e2e 100755
--- a/csshX
+++ b/csshX
@@ -1190,7 +1190,7 @@ sub parse_user_host_port {
 package CsshX::Launcher;
 
 use base    qw(CsshX::Socket::Selectable);
-use POSIX   qw(tmpnam);
+use File::Temp qw(tempfile);
 use FindBin qw($Bin $Script);;
 
 sub new {
@@ -1205,7 +1205,8 @@ sub new {
     CsshX::Window->screen_bounds;
 
     my @hosts  = $config->all_hosts;
-    my $sock   = $config->sock || tmpnam();
+    my ($fh, $filename) = tempfile();
+    my $sock = $config->sock || $filename;
     my $login  = $config->login || '';
     my @config = @{$config->config};
 
diff --git a/csshX.iterm b/csshX.iterm
index 8ddac58..3e15259 100755
--- a/csshX.iterm
+++ b/csshX.iterm
@@ -1144,7 +1144,7 @@ sub parse_user_host_port {
 package CsshX::Launcher;
 
 use base    qw(CsshX::Socket::Selectable);
-use POSIX   qw(tmpnam);
+use File::Temp qw(tempfile);
 use FindBin qw($Bin $Script);;
 
 sub new {
@@ -1159,7 +1159,8 @@ sub new {
     CsshX::Window->screen_bounds;
 
     my @hosts  = $config->all_hosts;
-    my $sock   = $config->sock || tmpnam();
+    my ($fh, $filename) = tempfile();
+    my $sock = $config->sock || $filename;
     my $login  = $config->login || '';
     my @config = @{$config->config};