Ubuntu Sverige

Kod: Markera allt

set ts=2
set sw=2
set expandtab

Kod: Markera allt

cd sökväg-till-mapp/nagaozen-gedit*
chmod +x install
./install

Kod: Markera allt

if (a=b) {
	c=d;
	e=f;
}

Kod: Markera allt

if (a=b) {
	c=d;
e=f;
}

Kod: Markera allt

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;             C++ MODE                 ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;; C++-specifikt. Vilka ändelser som skall associeras med C++ (iställetför C)
(add-to-list 'auto-mode-alist '("\\.h$"  . c++-mode)) ;h-filer
(add-to-list 'auto-mode-alist '("\\.icc" . c++-mode)) ;Implementeringsfiler
(add-to-list 'auto-mode-alist '("\\.tcc" . c++-mode)) ;Filer med templatekod

;;(add-hook 'c-mode-common-hook '(lambda () (c-set-style "stroustrup")))

(require 'compile)
(add-hook 'c++-mode-hook
          (lambda ()
            
            (font-lock-add-keywords nil 
                                    '(("\\<\\(FIXA\\|TEST\\|TODO\\|FIXME\\|BUG\\|NOTE\\)" 
                                       1 font-lock-warning-face prepend)))
            
            (setq 
             compilation-scroll-output 'first-error  ; scroll until first error
             ;; compilation-read-command nil          ; don't need enter
             compilation-window-height 11) 
            
            (local-set-key (kbd "<M-up>")   'previous-error) 
            (local-set-key (kbd "<M-down>") 'next-error)

            (unless (file-exists-p "Makefile")
              (set (make-local-variable 'compile-command)
                   ;; emulate make's .c.o implicit pattern rule, but with
                   ;; different defaults for the CC, CPPFLAGS, and CFLAGS
                   ;; variables:
                   ;; $(CC) -c -o $@ $(CPPFLAGS) $(CFLAGS) $<
                   (let ((file (file-name-nondirectory buffer-file-name)))
                     (format "%s -o %s %s %s"
                             (or (getenv "CC") "g++")
                             (file-name-sans-extension file)
                             ;;(or (getenv "CPPFLAGS") "-DDEBUG=9")
                             (or (getenv "CFLAGS") " -g -O2")
                             file)))))
          ;;(antalet saker i " " i format måste match antalet arg. i getenv.)
          
          ;;This will run Make if there is a Makefile in the same directory as the
          ;;source-file, or it will create a command for compiling a single
          ;;file and name the executable the same name as the file with the extension
          ;;stripped.
          )


;;Döda-kompilatorbuff.-om-success-------------
;;för att ta bort kompileringsfönster vid lyckad kompilering
;;funkar även för LaTeX
(defun notify-compilation-result(buffer msg)
  "Notify that the compilation is finished,
close the *compilation* buffer if the compilation is successful,
and set the focus back to Emacs frame"
  (if (string-match "^finished" msg)
    (progn
      ;;(delete-windows-on buffer)  ;;use kill instead:
     (kill-buffer-and-window)
     ;;(tooltip-show "\n Compilation Successful :-) \n "))
     )
      ;;(tooltip-show "\n Compilation Failed :-( \n "))
    )
  (setq current-frame (car (car (cdr (current-frame-configuration)))))
  (select-frame-set-input-focus current-frame)
  )
(add-to-list 'compilation-finish-functions
	     'notify-compilation-result)
;;--------------------------------------------


;;Show function name in mod-line--------------
(add-hook 'c-mode-common-hook 
  (lambda ()
    (which-function-mode t)))
;;--------------------------------------------


;;Fold code-block-----------------------------
(add-hook 'c-mode-common-hook
  (lambda()
    (local-set-key (kbd "C-c <right>") 'hs-show-block)
    (local-set-key (kbd "C-c <left>")  'hs-hide-block)
    (local-set-key (kbd "C-c <up>")    'hs-hide-all)
    (local-set-key (kbd "C-c <down>")  'hs-show-all)
    (hs-minor-mode t)))
;;--------------------------------------------


;;Stavningskontroll---------------------------
;;kontrollera kommentarer och strings
;;byt ordbok: "C-c e" = engelska, "C-c s"=svenska, "C-c w"=stängav flyspell
(add-hook 'c++-mode-hook
          '(lambda ()
             (local-set-key (kbd "C-c e")
                             (lambda()(interactive)
                               (ispell-change-dictionary "american")
                               (flyspell-prog-mode)
                               (flyspell-buffer)))
             (local-set-key (kbd "C-c s")
                             (lambda()(interactive)
                               (ispell-change-dictionary "svenska")
                               (flyspell-prog-mode)
                               (flyspell-buffer)))
             (local-set-key (kbd "C-c w")
                             (lambda()(interactive)
                               (flyspell-mode-off)))
             ))

;;--------------------------------------------