(setq visible-bell 1)
(setq ring-bell-function 'ignore)
(setq resize-mini-windows t)
+(blink-cursor-mode 0)
(add-to-list 'auto-mode-alist '("emacs\\'" . emacs-lisp-mode))
(require 'my-packages)
;; elscreen should be placed begin of https://github.com/knu/elscreen/issues/6
-(elscreen-start)
-(require 'init-elscreen)
+;(elscreen-start)
+;(require 'init-elscreen)
(require 'init-color-theme)
;(setq magit-auto-revert-mode nil)
-;(require 'init-evil)
+(require 'init-evil)
(global-set-key (kbd "C-x f") 'fiplr-find-file)
-;;---------------------------------------------------------------------------------------
-;; Wind-move
-;;
-(global-set-key (kbd "C-x C-l") 'windmove-right)
-(global-set-key (kbd "C-x C-h") 'windmove-left)
-(global-set-key (kbd "C-x C-k") 'windmove-up)
-(global-set-key (kbd "C-x C-j") 'windmove-down)
;;---------------------------------------------------------------------------------------
;; sr-speedbar
;(setq ecb-layout-name "leftright3")
-
-;(setq mac-command-modifier 'super) ; make cmd key do Meta
-(global-set-key (kbd "<s-return>") 'toggle-frame-fullscreen)
-
-
-
-
-(global-set-key (kbd "M-g M-v") 'split-window-right)
-(global-set-key (kbd "M-g M-s") 'split-window-below)
-(global-set-key (kbd "M-g M-o") 'delete-other-windows)
-
-(global-set-key (kbd "M-g M-w") 'other-window)
-
;; gnu global support
;(require 'semantic/db)
;(global-semanticdb-minor-mode 1)
(require 'init-ggtags)
-(global-unset-key "\C-o")
-(global-set-key (kbd "C-o C-o") 'keyboard-quit);; same as C-g to quit
-(global-set-key (kbd "C-o C-f") 'ido-find-file)
-(global-set-key (kbd "C-o C-r") 'recentf-ido-find-file)
-(global-set-key (kbd "C-o C-b") 'ido-switch-buffer)
-(global-set-key (kbd "C-o C-j") 'ido-find-file)
-
-
-(global-set-key (kbd "C-o C-g") 'ggtags-find-file)
-(global-set-key (kbd "C-o C-t") 'ggtags-find-tag-dwim)
-
-(global-set-key (kbd "M-g M-g") 'magit-status)
-
(setq scroll-margin 5)
(setq scroll-conservatively 10000)
(require 'recentf)
(recentf-mode 1)
(setq recentf-max-menu-items 100)
-(defun recentf-ido-find-file ()
- "Find a recent file using Ido."
- (interactive)
- (let ((file (ido-completing-read "Choose recent file: " recentf-list nil t)))
- (when file
- (find-file file))))
+
(require 'recentf-ext)
+
+(require 'init-key-binding)
+
+(require 'linum-relative)
+(winner-mode 1)
+
+(global-set-key (kbd "C-c C-l") 'winner-redo)
+(global-set-key (kbd "C-c C-h") 'winner-undo)
+
+
+
+;(require 'minibuffer-tray)
+;(require 'eyebrowse)
+;(eyebrowse-mode t)
+
+(require 'workgroups2)
+(workgroups-mode 1)
+
+
+(require 'minibuffer-line)
+;(minibuffer-line-mode 1)
+
+
+;(add-to-list 'load-path "~/.emacs.d/vendor")
+;(require 'minibuffer-tray)
+;(minibuffer-tray-mode 1)
+;(require 'xwem-minibuffer)
+
+; (run-at-time
+; nil 30
+; (lambda ()
+; (with-current-buffer " *Minibuf-0*"
+; (erase-buffer)
+; (dotimes (spaces (- (frame-width) 20))
+; (insert " "))
+; (insert (format-time-string "%m-%d %I:%M %p %a ")))))
+
+
+