gnu: libxt: Update to 1.3.1.

* gnu/packages/patches/libxt-guix-search-paths.patch: Adjust patch.
* gnu/packages/xorg.scm (libxt): Update to 1.3.1.

Change-Id: Ife5b761766c73a63413b5397286fffbd5e3e90a4
This commit is contained in:
宋文武 2024-12-28 18:17:49 +08:00
parent 427e7f713e
commit bbae86ea13
No known key found for this signature in database
GPG key ID: D415BF253B515976
2 changed files with 11 additions and 12 deletions

View file

@ -1,12 +1,12 @@
diff --git a/src/Intrinsic.c b/src/Intrinsic.c
--- a/src/Intrinsic.c
+++ b/src/Intrinsic.c
@@ -1345,21 +1345,99 @@ FillInLangSubs(Substitution subs, XtPerDisplay pd)
@@ -1310,21 +1310,98 @@ FillInLangSubs(Substitution subs, XtPerD
}
/*
- * default path used if environment variable XFILESEARCHPATH
- * is not defined. Also substitued for %D.
- * is not defined. Also substituted for %D.
- * The exact value should be documented in the implementation
- * notes for any Xt implementation.
+ Return the default search path for the function
@ -65,11 +65,6 @@ diff --git a/src/Intrinsic.c b/src/Intrinsic.c
+ bytesAllocd += SIZEOF_STEMS;
+ bytesAllocd += 6 * (1 + strlen (guix_profile));
+ }
- return xfilesearchpath;
-#else
- return XFILESEARCHPATHDEFAULT;
-#endif
+ if (home != NULL)
+ {
+ bytesAllocd += SIZEOF_STEMS;
@ -107,12 +102,16 @@ diff --git a/src/Intrinsic.c b/src/Intrinsic.c
+
+ /* Remove final : */
+ path[strlen(path) - 1] = '\0';
+
- return xfilesearchpath;
-#else
- return XFILESEARCHPATHDEFAULT;
-#endif
+ return path;
}
@@ -1388,7 +1466,7 @@ XtResolvePathname(Display *dpy,
@@ -1353,7 +1430,7 @@ XtResolvePathname(Display *dpy,
{
XtPerDisplay pd;
static const char *defaultPath = NULL;