mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-31 20:02:42 +00:00
Code Issues Releases Activity

; * src/fileio.c (Ffile_newer_than_file_p): Fix wording (bug#73709).

Browse Source
This commit is contained in:
Eli Zaretskii 2024-10-13 18:29:34 +03:00
parent b120397868
commit ae75ea6232
2 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/net/dictionary.el
View File

@ -320,7 +320,11 @@ Otherwise, `dictionary-search' displays definitions in a *Dictionary* buffer."
:version "30.1")
(defface dictionary-word-definition-face
'((((supports (:family "DejaVu Serif")))
;; w32 first, because 'supports' doesn't really tell whether the font
;; family exists, and MS-Windows selects an ugly font as result.
'((((type w32))
(:font "Sans Serif"))
(((supports (:family "DejaVu Serif")))
(:family "DejaVu Serif"))
(((type x))
(:font "Sans Serif"))
@ -328,7 +332,7 @@ Otherwise, `dictionary-search' displays definitions in a *Dictionary* buffer."
(:font "default")))
"The face that is used for displaying the definition of the word."
:group 'dictionary
:version "28.1")
:version "31.1")
(defface dictionary-word-entry-face
'((((type x))

4
src/fileio.c
View File

@ -3787,8 +3787,8 @@ DEFUN ("unix-sync", Funix_sync, Sunix_sync, 0, 0, "",
DEFUN ("file-newer-than-file-p", Ffile_newer_than_file_p, Sfile_newer_than_file_p, 2, 2, 0,
doc: /* Return t if file FILE1 is newer than file FILE2.
If FILE1 does not exist, the answer is nil;
otherwise, if FILE2 does not exist, the answer is t.
If FILE1 does not exist, the return value is nil;
if FILE2 does not exist, the return value is t.
For existing files, this compares their last-modified times. */)
(Lisp_Object file1, Lisp_Object file2)
{