; emulate PC C-tab and S-C-tab behaviour
(defun rotate-buffers (forward)
  "Rotate the buffer-list (to make forward/backward flipping of buffers"
  (if forward
      (bury-buffer)
    (switch-to-buffer (car (reverse (buffer-list))))))
(global-set-key [C-tab] '(lambda () (interactive) (rotate-buffers t)))
(global-set-key [C-S-iso-lefttab] 
                '(lambda () (interactive) (rotate-buffers nil)))
(global-set-key [C-M-tab] 
                '(lambda () (interactive) (rotate-buffers nil)))