comparison lisp/bindings.el @ 46523:0cdc8b745baf

(last-buffer): Add missing frame argument.

46522:16bfc5cf92da

(defun last-buffer () "\
Return the last non-hidden buffer in the buffer list."
  ;; This logic is more or less copied from bury-buffer,
  ;; except that we reverse the buffer list.
  (let ((fbl  (frame-parameter 'buffer-list))
	(list (buffer-list))
	(pred (frame-parameter nil 'buffer-predicate))
	found notsogood)
    ;; Merge the frame buffer list with the whole buffer list,
    ;; and reverse it.

46523:0cdc8b745baf

(defun last-buffer () "\
Return the last non-hidden buffer in the buffer list."
  ;; This logic is more or less copied from bury-buffer,
  ;; except that we reverse the buffer list.
  (let ((fbl  (frame-parameter nil 'buffer-list))
	(list (buffer-list))
	(pred (frame-parameter nil 'buffer-predicate))
	found notsogood)
    ;; Merge the frame buffer list with the whole buffer list,
    ;; and reverse it.