From a5a4522ac5a2e60f940e723be19f581cb8c75a43 Mon Sep 17 00:00:00 2001
From: Jacopo De Simoi <wilderkde@gmail.com>
Date: Mon, 18 Jan 2016 12:42:30 -0500
Subject: [PATCH] mode-line as I like it

---
 init.el            | 35 +++++++++++++++++++++++++++++++++++
 init/init-latex.el |  2 ++
 init/init-org.el   | 23 +++++++++++++++++++++++
 org-clock-save.el  |  2 +-
 org-pomodoro       |  2 +-
 5 files changed, 62 insertions(+), 2 deletions(-)

diff --git a/init.el b/init.el
index bfbeda7..05f27f4 100644
--- a/init.el
+++ b/init.el
@@ -453,6 +453,41 @@ This is the same as using \\[set-mark-command] with the prefix argument."
     (set-face-attribute face nil :weight 'normal))
   (face-list))
 
+(setq-default mode-line-modified '(:eval (if (buffer-modified-p) "●" "·"))) ;still  needs some improvements, does not report Readonly state
+(setq-default mode-line-remote '(:eval (let ((s (format-mode-line "%@")))
+  (cond
+   ((equal s "-") "·") ((equal s "@") "@") (t s)))))
+
+(defvar wilder-buffer-vc-mode-line
+	      '("%b" (vc-mode (:propertize
+		     ;; Strip the backend name from the VC status information
+		     (:eval (let* ((backend (downcase (symbol-name (vc-backend (buffer-file-name)))))
+				   (branch (substring vc-mode (+ (length backend) 2)))
+				   (s (substring vc-mode (+ (length backend) 1) (+ (length backend) 2)))
+				   (status (cond ((equal s "-") "") ((equal s ":") "!") (t s))))
+			      (concat "·" branch status)))
+		     face font-lock-keyword-face))))
+(put 'wilder-buffer-vc-mode-line 'risky-local-variable t)
+
+(defvar wilder-position
+  '("[%p,%I] " ))
+
+(put 'wilder-position 'risky-local-variable t)
+
+(setq-default mode-line-format
+	      '("%e"
+		mode-line-front-space
+		mode-line-mule-info
+		mode-line-client
+		mode-line-modified
+		mode-line-remote
+		mode-line-frame-identification
+		wilder-buffer-vc-mode-line "   "
+		wilder-position " "
+		mode-line-modes
+		mode-line-misc-info
+		mode-line-end-spaces))
+
 (setq server-name (kde-current-activity))
 (server-start)
 (menu-bar-mode -99)
diff --git a/init/init-latex.el b/init/init-latex.el
index 3fd4b5c..6b6f304 100644
--- a/init/init-latex.el
+++ b/init/init-latex.el
@@ -9,6 +9,8 @@
 (setq LaTeX-figure-label "f_")
 (setq TeX-fold-ellipsis " …")
 (require 'reftex)
+(add-hook 'LaTeX-mode-hook 'turn-on-reftex)
+
 
 (defun dabbrev-expand-helper ()
   (interactive)
diff --git a/init/init-org.el b/init/init-org.el
index 17a57fc..4aeb91c 100644
--- a/init/init-org.el
+++ b/init/init-org.el
@@ -2,6 +2,7 @@
 
 (require 'org-install)
 (require 'org-pomodoro)
+
 (add-hook 'org-mode-hook (lambda ()
 			   (turn-on-auto-fill)))
 (setq org-default-notes-file "~/org/notes.org")
@@ -18,3 +19,25 @@
 
 (setq org-clock-persist 'history)
 (org-clock-persistence-insinuate)
+
+(setq org-mobile-directory "~/coxeter/mobileOrg")
+
+;; found this in http://blog.zhengdong.me/2012/06/16/org-my-life/
+(defvar org-mobile-sync-timer nil)
+(defvar org-mobile-sync-idle-secs (* 60 4))
+(defun org-mobile-sync ()
+  (interactive)
+  (org-mobile-pull)
+  (org-mobile-push))
+(defun org-mobile-sync-enable ()
+  "enable mobile org idle sync"
+  (interactive)
+  (setq org-mobile-sync-timer
+        (run-with-idle-timer org-mobile-sync-idle-secs t
+                             'org-mobile-sync)));
+(defun org-mobile-sync-disable ()
+  "disable mobile org idle sync"
+  (interactive)
+  (cancel-timer org-mobile-sync-timer))
+(org-mobile-sync-enable)
+;;----------------------------------------------------------
diff --git a/org-clock-save.el b/org-clock-save.el
index c39e936..90ddb64 100644
--- a/org-clock-save.el
+++ b/org-clock-save.el
@@ -1 +1 @@
-;; org-persist.el - fourspoons at <2014-12-23 Tue 15:11>
+;; org-persist.el - fourspoons at <2016-01-17 Sun 23:50>
diff --git a/org-pomodoro b/org-pomodoro
index 3ab61f9..680b1f3 160000
--- a/org-pomodoro
+++ b/org-pomodoro
@@ -1 +1 @@
-Subproject commit 3ab61f959214b8ce76aad8a4ae52320652eca29b
+Subproject commit 680b1f3893fa89da01cc770acbb1dbe086749e96