diff options
| author | Richard M. Stallman | 1994-03-02 22:05:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-03-02 22:05:40 +0000 |
| commit | 7a8cc3071ee4a5085c7fedb97a479da9ef9ed03d (patch) | |
| tree | 3012ebbaec4ef47e20bb63309923aad99d96268c /src | |
| parent | 0cf4932f77b470a04ae0347cc4d4df1821e8a73d (diff) | |
| download | emacs-7a8cc3071ee4a5085c7fedb97a479da9ef9ed03d.tar.gz emacs-7a8cc3071ee4a5085c7fedb97a479da9ef9ed03d.zip | |
(Fdelete_frame): Don't initialize a Lisp_Object.
Clean up line breaks.
Diffstat (limited to 'src')
| -rw-r--r-- | src/frame.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/frame.c b/src/frame.c index b8d335a5095..f90d5384b0e 100644 --- a/src/frame.c +++ b/src/frame.c | |||
| @@ -701,14 +701,13 @@ but if the second optional argument FORCE is non-nil, you may do so.") | |||
| 701 | CONSP (frames); | 701 | CONSP (frames); |
| 702 | frames = XCONS (frames)->cdr) | 702 | frames = XCONS (frames)->cdr) |
| 703 | { | 703 | { |
| 704 | Lisp_Object this = XCONS (frames)->car; | 704 | Lisp_Object this; |
| 705 | this = XCONS (frames)->car; | ||
| 705 | 706 | ||
| 706 | if (! EQ (this, frame) | 707 | if (! EQ (this, frame) |
| 707 | && EQ (frame, | 708 | && EQ (frame, |
| 708 | (WINDOW_FRAME | 709 | WINDOW_FRAME (XWINDOW |
| 709 | (XWINDOW | 710 | (FRAME_MINIBUF_WINDOW (XFRAME (this)))))) |
| 710 | (FRAME_MINIBUF_WINDOW | ||
| 711 | (XFRAME (this))))))) | ||
| 712 | error ("Attempt to delete a surrogate minibuffer frame"); | 711 | error ("Attempt to delete a surrogate minibuffer frame"); |
| 713 | } | 712 | } |
| 714 | } | 713 | } |