1403 |
(unless menu-bar-buffers-menu-command-entries |
(unless menu-bar-buffers-menu-command-entries |
1404 |
(setq menu-bar-buffers-menu-command-entries |
(setq menu-bar-buffers-menu-command-entries |
1405 |
(list '(command-separator "--") |
(list '(command-separator "--") |
1406 |
|
(list 'next-buffer |
1407 |
|
'menu-item |
1408 |
|
"Next Buffer" |
1409 |
|
'next-buffer |
1410 |
|
:help "Switch to the \"next\" buffer in a cyclic order") |
1411 |
|
(list 'prev-buffer |
1412 |
|
'menu-item |
1413 |
|
"Previous Buffer" |
1414 |
|
'prev-buffer |
1415 |
|
:help "Switch to the \"previous\" buffer in a cyclic order") |
1416 |
(list 'select-named-buffer |
(list 'select-named-buffer |
1417 |
'menu-item |
'menu-item |
1418 |
"Select Named Buffer..." |
"Select Named Buffer..." |