mirror of
git://git.savannah.gnu.org/guix.git
synced 2023-12-14 03:33:07 +01:00
36a09d1853
* gnu/packages/emacs.scm (emacs): Update to 27.1. [source]: In snippet, use 'find-files' to find 'eshell/esh-groups.el' if it exists, but gracefully handle its absence. [arguments]: Add "--with-cairo" to configure-flags. Add 'restore-emacs-pdmp' and 'make-compressed-files-writable' phases. Explicitly return #t from 'install-site-start' phase. [inputs]: Add cairo, pango, harfbuzz, jansson, and gmp. Remove imagemagick. (emacs-next): Remove variable. (emacs-minimal, emacs-xwidgets): Use 'package/inherit'. [arguments]: Remove 'restore-emacs-pdmp' phase. (emacs-no-x): Use 'package/inherit'. [arguments]: Remove "--with-cairo" from configure-flags. Remove 'restore-emacs-pdmp' phase. [inputs]: Remove cairo, pango, and harfbuzz. (emacs-no-x-toolkit): Use 'package/inherit'. [arguments]: Remove 'restore-emacs-pdmp' phase. Remove superfluous quasiquote+unquote-splicing pair. (emacs-wide-int): Use 'package/inherit'. (guile-emacs): Use 'package/inherit'. [arguments]: Remove "--with-cairo" from configure-flags. Remove 'restore-emacs-pdmp' phase. * gnu/packages/patches/emacs-ignore-empty-xim-styles.patch, gnu/packages/patches/emacs-source-date-epoch.patch: Adapt to apply cleanly to emacs-27.1. * gnu/packages/patches/emacs-exec-path.patch: Replace with the previous contents of 'emacs27-exec-path.patch', but remove the superfluous comment about it being "like emacs-exec-path.patch, but for Emacs 27". * gnu/packages/patches/emacs27-exec-path.patch: Delete file. * gnu/local.mk (dist_patch_DATA): Remove 'emacs27-exec-path.patch'.
24 lines
698 B
Diff
24 lines
698 B
Diff
Fix contributed upstream here:
|
|
https://debbugs.gnu.org/cgi/bugreport.cgi?bug=42694.
|
|
|
|
Index: emacs-26.3/src/xfns.c
|
|
===================================================================
|
|
--- emacs-26.3.orig/src/xfns.c
|
|
+++ emacs-26.3/src/xfns.c
|
|
@@ -2628,6 +2628,8 @@ xic_free_xfontset (struct frame *f)
|
|
static XIMStyle
|
|
best_xim_style (XIMStyles *xim)
|
|
{
|
|
+ if (xim == NULL) goto out;
|
|
+
|
|
int i, j;
|
|
int nr_supported = ARRAYELTS (supported_xim_styles);
|
|
|
|
@@ -2636,6 +2638,7 @@ best_xim_style (XIMStyles *xim)
|
|
if (supported_xim_styles[i] == xim->supported_styles[j])
|
|
return supported_xim_styles[i];
|
|
|
|
+ out:
|
|
/* Return the default style. */
|
|
return XIMPreeditNothing | XIMStatusNothing;
|
|
}
|