diff options
| author | Kim F. Storm | 2006-07-18 13:30:04 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2006-07-18 13:30:04 +0000 |
| commit | 8009eb445e3bb2e536efed1bfa3cef69482ae079 (patch) | |
| tree | 506146ae13951a54dc386b6704ec2df0b3b4b766 | |
| parent | ba96a5cfd407db0f0b5d1d778cf548cedf5fc584 (diff) | |
| download | emacs-8009eb445e3bb2e536efed1bfa3cef69482ae079.tar.gz emacs-8009eb445e3bb2e536efed1bfa3cef69482ae079.zip | |
* xfaces.c (signal_error): Move to eval.c.
(resolve_face_name): Use xsignal1.
| -rw-r--r-- | src/xfaces.c | 14 |
1 files changed, 1 insertions, 13 deletions
diff --git a/src/xfaces.c b/src/xfaces.c index 14572af966d..f67ea61b37a 100644 --- a/src/xfaces.c +++ b/src/xfaces.c | |||
| @@ -486,7 +486,6 @@ static int font_scalable_p P_ ((struct font_name *)); | |||
| 486 | static int get_lface_attributes P_ ((struct frame *, Lisp_Object, Lisp_Object *, int)); | 486 | static int get_lface_attributes P_ ((struct frame *, Lisp_Object, Lisp_Object *, int)); |
| 487 | static int load_pixmap P_ ((struct frame *, Lisp_Object, unsigned *, unsigned *)); | 487 | static int load_pixmap P_ ((struct frame *, Lisp_Object, unsigned *, unsigned *)); |
| 488 | static unsigned char *xstrlwr P_ ((unsigned char *)); | 488 | static unsigned char *xstrlwr P_ ((unsigned char *)); |
| 489 | static void signal_error P_ ((char *, Lisp_Object)); | ||
| 490 | static struct frame *frame_or_selected_frame P_ ((Lisp_Object, int)); | 489 | static struct frame *frame_or_selected_frame P_ ((Lisp_Object, int)); |
| 491 | static void load_face_font P_ ((struct frame *, struct face *, int)); | 490 | static void load_face_font P_ ((struct frame *, struct face *, int)); |
| 492 | static void load_face_colors P_ ((struct frame *, struct face *, Lisp_Object *)); | 491 | static void load_face_colors P_ ((struct frame *, struct face *, Lisp_Object *)); |
| @@ -855,17 +854,6 @@ xstrlwr (s) | |||
| 855 | } | 854 | } |
| 856 | 855 | ||
| 857 | 856 | ||
| 858 | /* Signal `error' with message S, and additional argument ARG. */ | ||
| 859 | |||
| 860 | static void | ||
| 861 | signal_error (s, arg) | ||
| 862 | char *s; | ||
| 863 | Lisp_Object arg; | ||
| 864 | { | ||
| 865 | Fsignal (Qerror, Fcons (build_string (s), Fcons (arg, Qnil))); | ||
| 866 | } | ||
| 867 | |||
| 868 | |||
| 869 | /* If FRAME is nil, return a pointer to the selected frame. | 857 | /* If FRAME is nil, return a pointer to the selected frame. |
| 870 | Otherwise, check that FRAME is a live frame, and return a pointer | 858 | Otherwise, check that FRAME is a live frame, and return a pointer |
| 871 | to it. NPARAM is the parameter number of FRAME, for | 859 | to it. NPARAM is the parameter number of FRAME, for |
| @@ -3273,7 +3261,7 @@ resolve_face_name (face_name, signal_p) | |||
| 3273 | if (EQ (hare, tortoise)) | 3261 | if (EQ (hare, tortoise)) |
| 3274 | { | 3262 | { |
| 3275 | if (signal_p) | 3263 | if (signal_p) |
| 3276 | Fsignal (Qcircular_list, Fcons (orig_face, Qnil)); | 3264 | xsignal1 (Qcircular_list, orig_face); |
| 3277 | return Qdefault; | 3265 | return Qdefault; |
| 3278 | } | 3266 | } |
| 3279 | } | 3267 | } |