diff --git a/tcsh-6.22.02-double_tilde.dif b/tcsh-6.22.02-double_tilde.dif
new file mode 100644
index 0000000..c01c330
--- /dev/null
+++ b/tcsh-6.22.02-double_tilde.dif
@@ -0,0 +1,21 @@
+Date: Fri, 10 Jul 2020 18:13:45 +0200
+From tcsh-bounces@astron.com  Fri Jul 10 16:49:57 2020
+From: Hans Rosenfeld <rosenfeld@grumpf.hope-2000.org>
+To: tcsh@astron.com
+Subject: [Tcsh] ~~ expansion broken again
+Return-Path: <tcsh-bounces@astron.com>
+User-Agent: Mutt/1.12.2 (2019-09-21)
+Sender: Tcsh <tcsh-bounces@astron.com>
+
+--- sh.glob.c
++++ sh.glob.c	2017-04-05 12:54:37.623870649 +0000
+@@ -74,6 +74,9 @@ globtilde(Char *s)
+ {
+     Char *name, *u, *home, *res;
+ 
++    if (s[1] == '~')
++	return s;
++
+     u = s;
+     for (s++; *s && *s != '/' && *s != ':'; s++)
+ 	continue;
diff --git a/tcsh.changes b/tcsh.changes
index 908c58d..244c254 100644
--- a/tcsh.changes
+++ b/tcsh.changes
@@ -1,3 +1,9 @@
+-------------------------------------------------------------------
+Wed Jul 15 07:34:33 UTC 2020 - Dr. Werner Fink <werner@suse.de>
+
+- Add patch tcsh-6.22.02-double_tilde.dif from mailing list for
+  reported bug and already added upstream
+
 -------------------------------------------------------------------
 Thu May  7 08:22:30 UTC 2020 - Dr. Werner Fink <werner@suse.de>
 
diff --git a/tcsh.spec b/tcsh.spec
index 5f6bd92..f27f91a 100644
--- a/tcsh.spec
+++ b/tcsh.spec
@@ -35,6 +35,7 @@ Patch6:         tcsh-6.18.03-catalogs.dif
 Patch7:         tcsh-6.22.02-workaround-common.patch
 Patch8:         tcsh-6.22.02-local-dotlock.dif
 Patch9:         tcsh-6.22.02-history-merge.dif
+Patch10:        tcsh-6.22.02-double_tilde.dif
 BuildRequires:  autoconf
 BuildRequires:  fdupes
 BuildRequires:  ncurses-devel
@@ -63,6 +64,7 @@ correction, a history mechanism, job control, and a C-like syntax.
 %patch7 -p 1 -b .workaround
 %patch8 -p 0 -b .dotlock
 %patch9 -p 0 -b .histmrg
+%patch10 -p0 -b .dbltilde
 %patch0      -b .0
 
 %build