[Emacs-diffs] /srv/bzr/emacs/trunk r102376: * src/window.c (Fwindow_use_time): New function.

[Chong Yidong]

------------------------------------------------------------
revno: 102376
author: Martin Rudalics <address@hidden>
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sat 2010-11-13 13:49:22 -0500
message:
  * src/window.c (Fwindow_use_time): New function.
modified:
  src/ChangeLog
  src/window.c

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2010-11-13 13:29:31 +0000
+++ b/src/ChangeLog     2010-11-13 18:49:22 +0000
@@ -1,3 +1,7 @@
+2010-11-13  Martin Rudalics  <address@hidden>
+
+       * window.c (Fwindow_use_time): New function.
+
 2010-11-13  Eli Zaretskii  <address@hidden>
 
        * xdisp.c (set_cursor_from_row): Fix cursor positioning on

=== modified file 'src/window.c'
--- a/src/window.c      2010-09-25 13:21:20 +0000
+++ b/src/window.c      2010-11-13 18:49:22 +0000
@@ -2420,6 +2420,16 @@
   window_loop (CHECK_ALL_WINDOWS, Qnil, 1, Qt);
 }
 
+DEFUN ("window-use-time", Fwindow_use_time, Swindow_use_time, 0, 1, 0,
+       doc: /* Return WINDOW's use time.
+WINDOW defaults to the selected window.  The window with the highest use
+time is the most recently selected one.  The window with the lowest use
+time is the least recently selected one.  */)
+  (Lisp_Object window)
+{
+  return decode_window (window)->use_time;
+}
+
 DEFUN ("get-lru-window", Fget_lru_window, Sget_lru_window, 0, 2, 0,
        doc: /* Return the window least recently selected or used for display.
 \(LRU means Least Recently Used.)