Fix minor problems found by --enable-gcc-warnings.

* frame.c (Fhandle_focus_in, Fhandle_focus_out): Return a value.
* keyboard.c (kbd_buffer_get_event): Remove unused local.

3 files changed, 9 insertions, 3 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 7c3548c4f84..3f597ec63b1 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2013-07-16  Paul Eggert  <eggert@cs.ucla.edu>
+
+        Fix minor problems found by --enable-gcc-warnings.
+        * frame.c (Fhandle_focus_in, Fhandle_focus_out): Return a value.
+        * keyboard.c (kbd_buffer_get_event): Remove unused local.
+
 2013-07-16  Jan Djärv  <jan.h.d@swipnet.se>
 
         * xterm.c (x_focus_changed): Always generate FOCUS_IN_EVENT.
diff --git a/src/frame.c b/src/frame.c
index 5bd9f777755..5fa54052cd2 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -895,7 +895,7 @@ is not generated.
 This function checks if blink-cursor timers should be turned on again.  */)
   (Lisp_Object event)
 {
-  call0 (intern ("blink-cursor-check"));
+  return call0 (intern ("blink-cursor-check"));
 }
 
 DEFUN ("handle-focus-out", Fhandle_focus_out, Shandle_focus_out, 1, 1, "e",
@@ -905,7 +905,7 @@ Focus out events occur when no frame has focus.
 This function checks if blink-cursor timers should be turned off.  */)
   (Lisp_Object event)
 {
-  call0 (intern ("blink-cursor-suspend"));
+  return call0 (intern ("blink-cursor-suspend"));
 }
 
 DEFUN ("handle-switch-frame", Fhandle_switch_frame, Shandle_switch_frame, 1, 1, "e",
diff --git a/src/keyboard.c b/src/keyboard.c
index 5cdb87818ca..e852fb65cdd 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -4092,7 +4092,7 @@ kbd_buffer_get_event (KBOARD **kbp,
 #else
           struct x_display_info *di;
 #endif
-          Lisp_Object rest, frame = event->frame_or_window;
+          Lisp_Object frame = event->frame_or_window;
           bool focused = false;
 
           for (di = x_display_list; di && ! focused; di = di->next)