anchor.diff:                       "C-[" 'switch-buffer-previous
                        "C-]" 'switch-buffer-next
                        "C-x b" 'switch-buffer
  +                     "C-x C-b" 'list-buffers
                        "C-x k" 'delete-buffer
                        "C-w" 'delete-current-buffer
                        "C-x C-k" 'delete-current-buffer
  
positive.code:                     scheme:emacs
                      (list
                       "C-x C-c" 'quit
                       "C-[" 'switch-buffer-previous
                       "C-]" 'switch-buffer-next
                       "C-x b" 'switch-buffer
                       "C-x C-b" 'list-buffers
                       "C-x k" 'delete-buffer ; Emacs' default behaviour is to query.
                       "C-x C-k" 'delete-current-buffer
                       "C-x left" 'switch-buffer-previous
                       "C-x right" 'switch-buffer-next
                       "C-pageup" 'switch-buffer-previous
                       "C-pagedown" 'switch-buffer-next
                       "C-l" 'set-url
                       "M-l" 'set-url-new-buffer
                       "C-u M-l" 'set-url-nosave-buffer
                       "C-t" 'make-buffer-focus
                       "C-r" 'reload-current-buffer
                       "C-R" 'reload-buffer
                       "C-m o" 'set-url-from-bookmark
                       "C-m C-o" 'set-url-from-bookmark-new-buffer
                       "C-m s" 'bookmark-current-page
                       "C-m C-s" 'bookmark-page
                       "C-m k" 'bookmark-delete
                       "C-m u" 'bookmark-url
                       "C-M-l" 'copy-url
                       "C-M-i" 'copy-title
                       "C-h C-h" 'help
  
negative.code:                      "C-h s" 'describe-slot
                       "C-h k" 'describe-key
                       "C-h b" 'describe-bindings
                       "M-x" 'execute-command
                       "C-x 5 2" 'make-window
                       "C-x 5 0" 'delete-current-window
                       "C-x 5 1" 'delete-window)
  
                      scheme:vi-normal
                      (list
                       "Z Z" 'quit
                       "[" 'switch-buffer-previous
                       "]" 'switch-buffer-next
                       "g b" 'switch-buffer
                       "d" 'delete-buffer
                       "D" 'delete-current-buffer
  