Turn off bidi-display-reordering and add some page seperators

This commit is contained in:
Tom Willemsen 2011-08-16 16:49:35 +02:00
parent 8c0f844e3c
commit c348bcfd1c

View file

@ -1,7 +1,7 @@
;; -*- mode: Emacs-Lisp; -*- ;; -*- mode: Emacs-Lisp; -*-
(load "~/.emacs.d/ryuslash-load-path") (load "~/.emacs.d/ryuslash-load-path")
(load-file "~/.emacs.d/functions.el") (load-file "~/.emacs.d/functions.el")
;;; Autopair ;;; Autopair
(require 'autopair) (require 'autopair)
(autopair-global-mode t) ; automatically add the other delimiter (autopair-global-mode t) ; automatically add the other delimiter
@ -9,7 +9,7 @@
autopair-autowrap t autopair-autowrap t
autopair-blink nil) autopair-blink nil)
(setq-default autopair-dont-pair '(:string (?\' ?\") :comment (?\'))) (setq-default autopair-dont-pair '(:string (?\' ?\") :comment (?\')))
;; Column marker ;; Column marker
(defun set-column-markers (cm1 cm2) (defun set-column-markers (cm1 cm2)
(column-marker-1 cm1) (column-marker-1 cm1)
@ -25,7 +25,7 @@
(add-hook 'php-mode-hook (add-hook 'php-mode-hook
(lambda () (lambda ()
(set-column-markers 76 81))) (set-column-markers 76 81)))
;;; Org mode ;;; Org mode
(require 'org-crypt) (require 'org-crypt)
(require 'org-publish) (require 'org-publish)
@ -61,15 +61,15 @@
(flyspell-mode t) (flyspell-mode t)
(auto-fill-mode t))) (auto-fill-mode t)))
(org-crypt-use-before-save-magic) (org-crypt-use-before-save-magic)
;;; Rainbow delimiters ;;; Rainbow delimiters
(require 'rainbow-delimiters) (require 'rainbow-delimiters)
(setq rainbow-delimiters-max-face-count 8) (setq rainbow-delimiters-max-face-count 8)
;;; Uniquify ;;; Uniquify
(require 'uniquify) (require 'uniquify)
(setq uniquify-buffer-name-style 'post-forward) (setq uniquify-buffer-name-style 'post-forward)
;;; Go ;;; Go
(autoload 'go-mode "go-mode" "Major mode for google go" t) (autoload 'go-mode "go-mode" "Major mode for google go" t)
(autoload 'gofmt "go-mode" "" t) (autoload 'gofmt "go-mode" "" t)
@ -79,14 +79,14 @@
(lambda () (lambda ()
(turn-off-auto-fill) (turn-off-auto-fill)
(column-marker-1 -1))) (column-marker-1 -1)))
;;; Htmlize ;;; Htmlize
(require 'htmlize) (require 'htmlize)
(setq htmlize-output-type 'inline-css) (setq htmlize-output-type 'inline-css)
;;; Git ;;; Git
(require 'git) (require 'git)
;;; Markdown mode ;;; Markdown mode
(autoload 'markdown-mode "markdown-mode" "Major mode for Markdown" t) (autoload 'markdown-mode "markdown-mode" "Major mode for Markdown" t)
(setq whitespace-style '(face trailing)) ; For use with markdown mode (setq whitespace-style '(face trailing)) ; For use with markdown mode
@ -95,16 +95,16 @@
(lambda () (lambda ()
(whitespace-mode 1) (whitespace-mode 1)
(turn-on-auto-fill))) (turn-on-auto-fill)))
;;; Zencoding mode ;;; Zencoding mode
(autoload 'zencoding-mode "zencoding-mode" "Minor mode for zencoding" t) (autoload 'zencoding-mode "zencoding-mode" "Minor mode for zencoding" t)
(add-hook 'sgml-mode-hook 'zencoding-mode) ; Auto-start on any markup (add-hook 'sgml-mode-hook 'zencoding-mode) ; Auto-start on any markup
; modes ; modes
;;; Xmodmap mode ;;; Xmodmap mode
(autoload 'xmodmap-mode "xmodmap-mode" "Major mode for xmodmap" t) (autoload 'xmodmap-mode "xmodmap-mode" "Major mode for xmodmap" t)
(add-to-list 'auto-mode-alist '("\\.[xX]modmap\\(rc\\)?$" . xmodmap-mode)) (add-to-list 'auto-mode-alist '("\\.[xX]modmap\\(rc\\)?$" . xmodmap-mode))
;;; Gtags ;;; Gtags
(autoload 'gtags-mode "gtags" "Minor mode for using gtags" t) (autoload 'gtags-mode "gtags" "Minor mode for using gtags" t)
(add-hook 'gtags-mode-hook (add-hook 'gtags-mode-hook
@ -118,7 +118,7 @@
(lambda () (lambda ()
(gtags-mode t) (gtags-mode t)
(djcb-gtags-create-or-update))) (djcb-gtags-create-or-update)))
;;; PHP ;;; PHP
(autoload 'php-mode "php-mode" "Major mode for PHP" t) (autoload 'php-mode "php-mode" "Major mode for PHP" t)
(setq-default php-mode-warn-if-mumamo-off nil) ; don't warn me about this (setq-default php-mode-warn-if-mumamo-off nil) ; don't warn me about this
@ -130,6 +130,9 @@
(c-set-offset 'arglist-close '0) (c-set-offset 'arglist-close '0)
(local-set-key [f6] 'comment-line))) (local-set-key [f6] 'comment-line)))
(add-php-keywords) (add-php-keywords)
;;; bidi
(setq-default bidi-display-reordering nil)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; AUTOLOADS ;; ;; AUTOLOADS ;;
@ -257,7 +260,6 @@
(add-hook 'message-mode-hook 'on-mail-mode) (add-hook 'message-mode-hook 'on-mail-mode)
(add-hook 'git-commit-mode-hook 'auto-fill-mode) (add-hook 'git-commit-mode-hook 'auto-fill-mode)
(add-hook 'css-mode-hook 'rainbow-mode) (add-hook 'css-mode-hook 'rainbow-mode)
(add-hook 'after-make-frame-functions 'setup-system-frame-colours t)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; SKELETONS ;; ;; SKELETONS ;;