Литературно пишем конфиг
Литературно пишем конфиг

(when (>= emacs-major-version 24)
(require 'package) ;; You might already have this line
;; For important compatibility libraries like cl-lib
(add-to-list
 'package-archives 
 '("melpa" . "http://melpa.org/packages/") 
 t)
(add-to-list
 'package-archives
 '("gnu" . "http://elpa.gnu.org/packages/")
 t)
(package-initialize) ;; You might already have this line
)

;;org-mode export problem 
(setq org-src-fontify-natively t)
;;Настройка используемых блогов
(setq org2blog/wp-blog-alist
      '(("local-craftingbe"
         :url "http://localhost:8000/xmlrpc/"
         :username "user"
         :default-title "Hello this is org-mode"
         :default-categories nil
         :tags-as-categories nil)
        ))

;; Разрешить выполнение кодовых блоков 
(org-babel-do-load-languages
 'org-babel-load-languages
 '((sh         . t)
   (emacs-lisp . t)
   (python     . t)
   (dot        . t)
   (css        . t)
   ))

(require 'helm-config)
(global-set-key (kbd "M-x") #'helm-M-x)
(global-set-key (kbd "C-x r b") #'helm-filtered-bookmarks)
(global-set-key (kbd "C-x C-f") #'helm-find-files)
;; Выбор между удаленным
(global-set-key (kbd "M-y") 'helm-show-kill-ring)
(helm-mode 1)

(global-set-key (kbd "C-x b") 'helm-mini)
(setq helm-buffers-fuzzy-matching t
      helm-recentf-fuzzy-match    t)
;; ;; Всякое гибкое автодополнение при переключении между буферами и
;; ;; открытии файла
;; (setq ido-enable-flex-matching t)
;; (setq ido-everywhere t)
;; (ido-mode 1)

;; Emacs for python
(require 'elpy)
(elpy-enable)
;;(elpy-use-ipython) - вот это штука вместо нормального ipython отдает
;;кракозябры
(setq elpy-rpc-backend "jedi")          ; Что это?
;;(add-to-list 'auto-mode-alist '("\\.py\\'" . elpy-mode))
;;'(elpy-mode-hook (quote (subword-mode hl-line-mode)))

(defun prelude-personal-python-mode-defaults ()
  "Personal defaults for Python programming."
  ;; Enable elpy mode
  (semantic-mode -1)
  (global-ede-mode -1)
  (elpy-mode)
  ;; Jedi backend
  ;; (jedi:setup)
  ;; (setq jedi:complete-on-dot t) ;optional
  ;; (auto-complete-mode)
  ;; (jedi:ac-setup)
  ;; (setq elpy-rpc-python-command "python3")
  ;; (python-shell-interpreter "ipython3")
  (company-quickhelp-mode)
  )

(setq prelude-personal-python-mode-hook 'prelude-personal-python-mode-defaults)
(add-hook 'python-mode-hook (lambda ()
                              (run-hooks 'prelude-personal-python-mode-hook)))

(require 'yasnippet)
(yas-global-mode 1)


(semantic-mode 1)
(setq helm-semantic-fuzzy-match t
      helm-imenu-fuzzy-match    t)

(require 'company)
(add-hook 'after-init-hook 'global-company-mode)
;; company-c-headers
(add-to-list 'company-backends 'company-c-headers)

;; (eval-after-load 'company
;;   '(progn
;;      (define-key company-mode-map [C-tab] 'helm-company)
;;      (define-key company-active-map [C-tab] 'helm-company)
;;      (define-key company-mode-map [tab] 'company-complete) ; вот вроде добавил а толку то , рефакторинг то по tab невозможен.
;;      (define-key company-active-map [tab] 'company-complete)
;;      )
;;   )

(require 'semantic/ia)
(require 'semantic/bovine/gcc)

(defun my-flycheck-c-setup ()
  (setq flycheck-clang-language-standard "gnu99"))

(add-hook 'c-mode-hook #'my-flycheck-c-setup)

(when (cedet-gnu-global-version-check t)
  (semanticdb-enable-gnu-global-databases 'c-mode)
  (semanticdb-enable-gnu-global-databases 'c++-mode))

(global-ede-mode 1)

(tool-bar-mode -1)                      ;Отключает тулбар
;; Встроенное отображение номеров строки сбоку
(require 'linum)
(setq linum-format "%d ")
(global-linum-mode 1)

(ede-cpp-root-project "adc-to-uart" 
                      :name "adc-to-uart"
                      :file "~/forge/pmg/avr/adc_to_uart/main.c"
                      :include-path '("/")
                      :system-include-path '("/usr/lib/gcc/avr/4.9.2/include"
                                             "/usr/lib/avr/include/"
                                             )
)

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(company-auto-complete t)
 '(ecb-options-version "2.40")
 '(ede-project-directories
   (quote
    ("/home/user/pmg/c/mycpp" "/home/user/pmg/c/testemacs" "/home/user/pmg/avr/adc_to_uart")))
   )
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(web-mode-current-element-highlight-face ((t (:foreground "#FF8A4B"))))
 '(web-mode-html-tag-bracket-face ((t (:foreground "#FFE84B"))))
 '(web-mode-html-tag-face ((t (:foreground "#729fcf")))))