From e2017fe2a1a3ac4b0bf27f2eba86be49bf376c87 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 3 Jul 2012 16:34:47 -0400 Subject: [PATCH] * src/lisp.h (Fread_file_name): Restore EXFUN (it's not a normal DEFUN and did not make it into globals.h). --- src/ChangeLog | 5 +++++ src/lisp.h | 5 +++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index 4f06b3d3509..b1575f621e3 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2012-07-03 Glenn Morris + + * lisp.h (Fread_file_name): Restore EXFUN (it's not a normal DEFUN + and did not make it into globals.h). + 2012-07-03 Tom Tromey * window.c (Fset_window_margins, Fset_window_fringes) diff --git a/src/lisp.h b/src/lisp.h index 9102103bc7b..a0d6c6b3c0b 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -1,6 +1,6 @@ /* Fundamental definitions for GNU Emacs Lisp interpreter. - Copyright (C) 1985-1987, 1993-1995, 1997-2012 - Free Software Foundation, Inc. + +Copyright (C) 1985-1987, 1993-1995, 1997-2012 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -2835,6 +2835,7 @@ extern Lisp_Object Qfile_directory_p; extern Lisp_Object Qinsert_file_contents; extern Lisp_Object Qfile_name_history; extern Lisp_Object expand_and_dir_to_file (Lisp_Object, Lisp_Object); +EXFUN (Fread_file_name, 6); /* not a normal DEFUN */ extern Lisp_Object close_file_unwind (Lisp_Object); extern Lisp_Object restore_point_unwind (Lisp_Object); extern _Noreturn void report_file_error (const char *, Lisp_Object); -- 2.39.2