Mutt: color fix.

Emacs: flex mode, org mode PDF reader.

.emacs.d/mc-lists.el

@@ -3,7 +3,8 @@
 
 (setq mc/cmds-to-run-for-all
       '(
-        fill-paragraph
+        org-beginning-of-line
+        org-delete-char
         ))
 
 (setq mc/cmds-to-run-once

.emacs.d/modes.el

@@ -566,3 +566,53 @@ properly escaped with double-quotes in case it has spaces."
    (local-set-key (kbd "C-c C-b") 'texinfo-my-menu-update)
    (local-set-key (kbd "C-c C-v") 'texinfo-pdf-view)
    (local-set-key "\C-c\C-t\C-b" 'texinfo-my-compile)))
+
+
+;;==============================================================================
+;; Flex mode
+;;==============================================================================
+
+(require 'derived)
+;(require 'cc-mode)
+
+(define-derived-mode flex-mode c-mode "Flex"
+  "Major mode for editing flex files"
+
+  ;; Try to set the indentation correctly
+  (setq-default c-basic-offset 4)
+  (make-variable-buffer-local 'c-basic-offset)
+
+  (c-set-offset 'knr-argdecl-intro 0)
+  (make-variable-buffer-local 'c-offsets-alist)
+
+  ;; Remove auto and hungry anything
+  (c-toggle-auto-hungry-state -1)
+  (c-toggle-auto-state -1)
+  (c-toggle-hungry-state -1)
+
+  (use-local-map flex-mode-map)
+
+  ;; Get rid of that damn electric-brace which is not useful with flex
+  (define-key flex-mode-map "{"	'self-insert-command)
+  (define-key flex-mode-map "}"	'self-insert-command)
+
+  (define-key flex-mode-map [tab] 'flex-indent-command)
+
+  (setq comment-start "/*"
+	comment-end "*/"
+	)
+  )
+
+(defalias 'flex-indent-command 'c-indent-command)
+
+(provide 'flex-mode)
+
+;;==============================================================================
+;; Org mode
+;;==============================================================================
+
+;; PDFs visited in Org-mode are opened in Evince (and not in the default choice)
+(eval-after-load "org"
+  '(progn
+     ;; Change .pdf association directly within the alist
+     (setcdr (assoc "\\.pdf\\'" org-file-apps) "zathura --fork %s")))

.emacs.d/plugins.el

@@ -161,3 +161,4 @@
       (define-key my-keys-minor-mode-map (kbd "C-c C-n") 'mc/mark-next-word-like-this)
       (define-key my-keys-minor-mode-map (kbd "C-c C-p") 'mc/mark-previous-word-like-this)
       (define-key my-keys-minor-mode-map (kbd "C-c C-l") 'mc/mark-all-like-this-dwim)))
+

.mutt.d/colors.ambrevar

@@ -1,5 +1,5 @@
 # -*- mode:sh -*-
-## Theme kindly inspired from 
+## Theme kindly inspired from
 ## http://nongeekshandbook.blogspot.ie/2009/03/mutt-color-configuration.html
 
 ## Colours for items in the index
@@ -18,9 +18,9 @@ mono index bold ~D
 ## Highlights inside the body of a message.
 
 # URLs
-color body brightgreen black "(http|ftp|news|telnet|finger)://[^ \"\t\r\n]*"
+color body brightgreen black "(https?|ftp|news|telnet|finger)://[^ \"\t\r\n]*"
 color body brightgreen black "mailto:[-a-z_0-9.]+@[-a-z_0-9.]+"
-mono body bold "(http|ftp|news|telnet|finger)://[^ \"\t\r\n]*"
+mono body bold "(https?|ftp|news|telnet|finger)://[^ \"\t\r\n]*"
 mono body bold "mailto:[-a-z_0-9.]+@[-a-z_0-9.]+"
 
 ## Email addresses.
@@ -65,7 +65,7 @@ color quoted7 $my_col_comment black
 ## Default color definitions
 #color hdrdefault white green
 color signature $my_col_comment black
-color indicator black cyan 
+color indicator black cyan
 color attachment $my_col_shadow $my_col_shadow_bg
 color error red black
 color message white black