aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPo Lu2024-08-13 09:12:30 +0800
committerPo Lu2024-08-13 09:12:30 +0800
commit6533fd65b6f187af5fe7202fc4ab344cc3df4cb1 (patch)
treed380d3f3d899cf69ca4008e351b8239c196c6eb9
parentcd66b848128a4cc4dbb1958d23ed023c9fad69ef (diff)
parentb585826a65ebfb58d3fe4744f0f8f9b5f3fc08cc (diff)
downloademacs-6533fd65b6f187af5fe7202fc4ab344cc3df4cb1.tar.gz
emacs-6533fd65b6f187af5fe7202fc4ab344cc3df4cb1.zip
Merge from savannah/emacs-30
b585826a65e ; * lisp/files.el (require-with-check): Fix doc string an... 6d55e94996e macOS: Wrong frame rectangle after wake (bug#71912) c49724b9649 ; Grammar fixes 5c3d340e001 Fix format 2 cmap handling in sfnt.c
-rw-r--r--doc/misc/erc.texi12
-rw-r--r--lisp/erc/erc.el8
-rw-r--r--lisp/files.el12
-rw-r--r--src/nsterm.m1
-rw-r--r--src/sfnt.c10
5 files changed, 22 insertions, 21 deletions
diff --git a/doc/misc/erc.texi b/doc/misc/erc.texi
index c7822793a20..9cfb12c9231 100644
--- a/doc/misc/erc.texi
+++ b/doc/misc/erc.texi
@@ -867,8 +867,8 @@ ERC's auth-source integration}.
867@defun erc-compute-server &optional server 867@defun erc-compute-server &optional server
868Return an IRC server name. 868Return an IRC server name.
869 869
870This tries a number of increasingly more default methods until a non-@code{nil} 870This tries a progressively greater number of default methods until a
871value is found. 871non-@code{nil} value is found.
872 872
873@itemize @bullet 873@itemize @bullet
874@item @var{server} (the argument passed to this function) 874@item @var{server} (the argument passed to this function)
@@ -888,8 +888,8 @@ IRC server to use if one is not provided.
888@defun erc-compute-port &optional port 888@defun erc-compute-port &optional port
889Return a port for an IRC server. 889Return a port for an IRC server.
890 890
891This tries a number of increasingly more default methods until a non-@code{nil} 891This tries a progressively greater number of default methods until a
892value is found. 892non-@code{nil} value is found.
893 893
894@itemize @bullet 894@itemize @bullet
895@item @var{port} (the argument passed to this function) 895@item @var{port} (the argument passed to this function)
@@ -910,7 +910,7 @@ This can be either a string or a number.
910@defun erc-compute-nick &optional nick 910@defun erc-compute-nick &optional nick
911Return user's IRC nick. 911Return user's IRC nick.
912 912
913This tries a number of increasingly more default methods until a 913This tries a progressively greater number of default methods until a
914non-@code{nil} value is found. 914non-@code{nil} value is found.
915 915
916@itemize 916@itemize
@@ -1010,7 +1010,7 @@ auth-source facility to retrieve a server password, although hitting
1010@defun erc-compute-full-name &optional full-name 1010@defun erc-compute-full-name &optional full-name
1011Return user's full name. 1011Return user's full name.
1012 1012
1013This tries a number of increasingly more default methods until a 1013This tries a progressively greater number of default methods until a
1014non-@code{nil} value is found. 1014non-@code{nil} value is found.
1015 1015
1016@itemize @bullet 1016@itemize @bullet
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index 118adb803c9..5e8fa3051c7 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -8794,7 +8794,7 @@ Sets the buffer local variables:
8794(defun erc-compute-server (&optional server) 8794(defun erc-compute-server (&optional server)
8795 "Return an IRC server name. 8795 "Return an IRC server name.
8796 8796
8797This tries a number of increasingly more default methods until a 8797This tries a progressively greater number of default methods until a
8798non-nil value is found. 8798non-nil value is found.
8799 8799
8800- SERVER (the argument passed to this function) 8800- SERVER (the argument passed to this function)
@@ -8813,7 +8813,7 @@ non-nil value is found.
8813(defun erc-compute-nick (&optional nick) 8813(defun erc-compute-nick (&optional nick)
8814 "Return user's IRC nick. 8814 "Return user's IRC nick.
8815 8815
8816This tries a number of increasingly more default methods until a 8816This tries a progressively greater number of default methods until a
8817non-nil value is found. 8817non-nil value is found.
8818 8818
8819- NICK (the argument passed to this function) 8819- NICK (the argument passed to this function)
@@ -8837,7 +8837,7 @@ the user field and use whatever it returns as the server password."
8837(defun erc-compute-full-name (&optional full-name) 8837(defun erc-compute-full-name (&optional full-name)
8838 "Return user's full name. 8838 "Return user's full name.
8839 8839
8840This tries a number of increasingly more default methods until a 8840This tries a progressively greater number of default methods until a
8841non-nil value is found. 8841non-nil value is found.
8842 8842
8843- FULL-NAME (the argument passed to this function) 8843- FULL-NAME (the argument passed to this function)
@@ -8853,7 +8853,7 @@ non-nil value is found.
8853(defun erc-compute-port (&optional port) 8853(defun erc-compute-port (&optional port)
8854 "Return a port for an IRC server. 8854 "Return a port for an IRC server.
8855 8855
8856This tries a number of increasingly more default methods until a 8856This tries a progressively greater number of default methods until a
8857non-nil value is found. 8857non-nil value is found.
8858 8858
8859- PORT (the argument passed to this function) 8859- PORT (the argument passed to this function)
diff --git a/lisp/files.el b/lisp/files.el
index 73ad85ce854..dc796fffaa1 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1258,11 +1258,11 @@ See `load-file' for a different interface to `load'."
1258(defun require-with-check (feature &optional filename noerror) 1258(defun require-with-check (feature &optional filename noerror)
1259 "If FEATURE is not already loaded, load it from FILENAME. 1259 "If FEATURE is not already loaded, load it from FILENAME.
1260This is like `require' except if FEATURE is already a member of the list 1260This is like `require' except if FEATURE is already a member of the list
1261`features’, then we check if this was provided by a different file than the 1261`features’, then check if it was provided by a different file than the
1262one that we would load now (presumably because `load-path' has been 1262one that is about to be loaded now (presumably because `load-path' has
1263changed since the file was loaded). 1263been changed since FILENAME was loaded). If that is the case, either
1264If it's the case, we either signal an error (the default), or forcibly reload 1264signal an error (the default), or forcibly reload the new file (if
1265the new file (if NOERROR is equal to `reload'), or otherwise emit a warning." 1265NOERROR is equal to `reload'), or otherwise emit a warning."
1266 (let ((lh load-history) 1266 (let ((lh load-history)
1267 (res (require feature filename (if (eq noerror 'reload) nil noerror)))) 1267 (res (require feature filename (if (eq noerror 'reload) nil noerror))))
1268 ;; If the `feature' was not yet provided, `require' just loaded the right 1268 ;; If the `feature' was not yet provided, `require' just loaded the right
@@ -1275,7 +1275,7 @@ the new file (if NOERROR is equal to `reload'), or otherwise emit a warning."
1275 ((assoc fn load-history) nil) ;We loaded the right file. 1275 ((assoc fn load-history) nil) ;We loaded the right file.
1276 ((eq noerror 'reload) (load fn nil 'nomessage)) 1276 ((eq noerror 'reload) (load fn nil 'nomessage))
1277 (t (funcall (if noerror #'warn #'error) 1277 (t (funcall (if noerror #'warn #'error)
1278 "Feature provided by other file: %S" feature))))) 1278 "Feature `%S' is now provided by a different file %s" fn)))))
1279 res)) 1279 res))
1280 1280
1281(defun file-remote-p (file &optional identification connected) 1281(defun file-remote-p (file &optional identification connected)
diff --git a/src/nsterm.m b/src/nsterm.m
index 473a5e705e9..8c405738467 100644
--- a/src/nsterm.m
+++ b/src/nsterm.m
@@ -7968,6 +7968,7 @@ ns_in_echo_area (void)
7968 dpyinfo->ns_focus_frame = emacsframe; 7968 dpyinfo->ns_focus_frame = emacsframe;
7969 7969
7970 ns_frame_rehighlight (emacsframe); 7970 ns_frame_rehighlight (emacsframe);
7971 [self adjustEmacsFrameRect];
7971 7972
7972 event.kind = FOCUS_IN_EVENT; 7973 event.kind = FOCUS_IN_EVENT;
7973 XSETFRAME (event.frame_or_window, emacsframe); 7974 XSETFRAME (event.frame_or_window, emacsframe);
diff --git a/src/sfnt.c b/src/sfnt.c
index b235c795ef7..1ed492b7506 100644
--- a/src/sfnt.c
+++ b/src/sfnt.c
@@ -1093,10 +1093,10 @@ sfnt_lookup_glyph_2 (sfnt_char character,
1093 unsigned char *slice; 1093 unsigned char *slice;
1094 uint16_t glyph; 1094 uint16_t glyph;
1095 1095
1096 if (character > 65335) 1096 if (character > 65535)
1097 return 0; 1097 return 0;
1098 1098
1099 i = character >> 16; 1099 i = character >> 8;
1100 j = character & 0xff; 1100 j = character & 0xff;
1101 k = format2->sub_header_keys[i] / 8; 1101 k = format2->sub_header_keys[i] / 8;
1102 1102
@@ -1129,9 +1129,9 @@ sfnt_lookup_glyph_2 (sfnt_char character,
1129 return 0; 1129 return 0;
1130 } 1130 }
1131 1131
1132 /* k is 0, so glyph_index_array[i] is the glyph. */ 1132 /* k is 0, so glyph_index_array[j] is the glyph. */
1133 return (i < format2->num_glyphs 1133 return (j < format2->num_glyphs
1134 ? format2->glyph_index_array[i] 1134 ? format2->glyph_index_array[j]
1135 : 0); 1135 : 0);
1136} 1136}
1137 1137