Why function gives this error?.. "Wrong type argument: stringp, #<buffer *Messages*>"

[Chris Seberino]

I tried to write a function that goes to next buffer **in alphabetical order**.
(I set f8 to call it.)

It makes a sorted version of buffer list and goes to next buffer in the list...


(global-set-key [f8]           (lambda () (interactive)
                                (let ((sorted-list
                                       (sort (buffer-list) 'string<)))
                                     (switch-to-buffer
                                      (nth 2
                                           (member
                                            (current-buffer) sorted-list))))))

Any help greatly appreciated.

cs