[Emacs Lisp] Personal ~/.emacs.d/ configuration folder.

Custom navigation bindings with M

Commit
fe8186741a8f91b9ba671314dd1380de8e19f405
Author
Blendoit <blendoit@gmail.com>
Author date
Committer
Blendoit <blendoit@gmail.com>
Committer date
smart-documents.org
index 01e15efa..52946ddc 100644..100644
@@ -410,7 +410,7 @@
410 410
411 411 *** Open Org mode document properties
412 412
413 Removed: #+BEGIN_SRC emacs-lisp :tangle yes
413 Added: #+BEGIN_SRC emacs-lisp :tangle no
414 414 (global-set-key [f9] 'sd-document-properties)
415 415 #+END_SRC
416 416
@@ -456,17 +456,18 @@
456 456 #+BEGIN_SRC emacs-lisp :tangle yes
457 457 (global-set-key (kbd "C-`") 'delete-other-windows)
458 458 #+END_SRC
459 Added:
459 460 *** Delete frame or kill Emacs
460 461
461 462 #+NAME: delete-frame-or-kill-emacs
462 463 #+BEGIN_SRC emacs-lisp :tangle yes
463 Removed: (global-set-key (kbd "C-q")
464 Removed: '(lambda ()
465 Removed: (interactive)
466 Removed: "delete frame; if sole frame, kill Emacs."
467 Removed: (if (> (length (frame-list)) 1)
468 Removed: (delete-frame)
469 Removed: (kill-emacs))))
464 Added: (global-set-key (kbd "C-q")
465 Added: '(lambda ()
466 Added: (interactive)
467 Added: "delete frame; if sole frame, kill Emacs."
468 Added: (if (> (length (frame-list)) 1)
469 Added: (delete-frame)
470 Added: (kill-emacs))))
470 471 #+END_SRC
471 472
472 473 *** Open sidebar
@@ -490,7 +491,7 @@
490 491 (global-set-key (kbd "C-+") 'text-scale-increase)
491 492 #+END_SRC
492 493
493 Removed: ** Navigation
494 Added: ** TODO Navigation
494 495
495 496 =Alt= (=Meta=) is the privileged key for motion in a buffer. It is
496 497 followed by an optional numerical argument, and a movement
@@ -513,10 +514,12 @@
513 514 We prevent Org mode from overriding preferred navigation keys.
514 515
515 516 #+BEGIN_SRC emacs-lisp :tangle yes
516 Removed: (local-unset-key (kbd "M-j"))
517 Removed: (local-unset-key (kbd "M-k"))
518 Removed: (local-unset-key (kbd "M-l"))
519 Removed: (local-unset-key (kbd "M-h"))
517 Added: (add-hook 'org-mode
518 Added: '(lambda ()
519 Added: (local-unset-key (kbd "M-j"))
520 Added: (local-unset-key (kbd "M-k"))
521 Added: (local-unset-key (kbd "M-l"))
522 Added: (local-unset-key (kbd "M-h"))))
520 523 #+END_SRC
521 524
522 525 *** Move down one line