;; http://generaldepoten.bravepages.com/sle/index.html ;; http://www.geocities.com/Athens/Troy/6160/sle/index.html ;; http://members.fortunecity.se/generaldepoten/sle/index.html ;; http://www.generaldepoten.tk ;; http://www.oblomoveri.tk ;; ;; Erik Jonsson ;; 18.2.2004 (den adertonde februari år tvåtusenfyra) ;; Kommentarer tillagda senast 17.5.2004 ;; ;; Ett exempel på en inställningsfil till Emacs för vanligt bruk. ;; Detta fungerar med Emacs 20.x och 21.x men ;; Emacs 19.x kräver delvis andra inställningar. ;; ;; Detta är inställningar, som fungerar bra för mig, så ;; förmodligen fungerar de bra för somliga andra också. ;; ;; Spara denna fil som endera ;; /usr/share/emacs//site-lisp/default.el ;; eller /usr/local/share/emacs//site-lisp/default.el ;; eller ~/.emacs.el ;; ;; Semikolon är kommentartecken: det, som står efter semikolon, ;; utföres icke. Märk, att somliga alternativ utesluter varandra, ;; medan somliga kräver att viss annan programvara är installerad, ;; så att några alternativ är bortkommenterade ifrån början. ;; ;; ISO Latin 1 support (normal visning av bl.a. åäö även i epost m.m.) (set-language-environment 'Latin-1) ;; ;; Följande är kanske inte nödvändigt i Slackware Linux men gör ingen ;; skada iheller. Däremot behövs tydligen dessa rader, för att man ;; skall kunna skriva med svenska bokstäver i »console« (textläget ;; utanför X-fönstersystemet) i FreeBSD. (set-input-mode (car (current-input-mode)) (nth 1 (current-input-mode)) 0) ;; Om man endast använder västeuropeisk text och ingenting annat, kan man ;; också välja följande, som var normalt i Emacs version 19.x ;(standard-display-european t 'iso-latin-1) ;; Svensk rättstavning som förval (setq ispell-dictionary "svenska") ;; Filer med namn på »latin1« före punkt innehåller västeuropeisk text ;(modify-coding-system-alist 'file "\\latin1.*\\'" 'iso-8859-1) ;; Filer med namn på »koi8« före punkt innehåller rysk text ;(modify-coding-system-alist 'file "\\koi8.*\\'" 'koi8-r) ;; Filer med namn på »mule« före punkt innehåller tecken ;; enligt flera olika teckentabeller, t.ex. både rysk och svensk ;(modify-coding-system-alist 'file "\\mule.*\\'" 'emacs-mule) ;; Filer med namn på »latin2« före punkt innehåller östeuropeisk text ;(modify-coding-system-alist 'file "\\latin2.*\\'" 'iso-8859-2) ;; Vi vill ej ha amerikansk datumvisning (setq european-calendar-style t) ;; Visa tiden (display-time) ;; Använda påminnelser i kalendern. Man måste ha en fil vid namn ;; »diary« i sin hemkatalog, annars klagar Emacs vid start! ;(add-hook 'diary-hook 'appt-make-list) ;(diary 0) ;; set load-path (beror på var, man har installerat Emacs) (setq load-path (cons "/usr/share/emacs/site-lisp" load-path)) ;(setq load-path (cons "/usr/local/share/emacs/site-lisp" load-path)) ;; Numrerade backupfiler (setq make-backup-files t) (setq version-control t) ;; Visa alla sorters filer i speedbar (setq speedbar-show-unknown-files t) ;; Visa inte verktygsbalk med ikoner (tar plats i onödan) (tool-bar-mode -1) ;; Redigera filer via FTP (require 'ange-ftp) ;; Sökvägar till infofiler, som öppnas i Help - Browse manuals (setq Info-default-directory-list (append Info-default-directory-list '("/usr/info/"))) (setq Info-default-directory-list (append Info-default-directory-list '("/usr/local/info/"))) ;; Sök&ersätt skall skilja på versaler och gemena (setq default-case-fold-search nil) ;; Markerad text färgmarkeras särskilt (setq-default transient-mark-mode t) ;; Visa om parenteser hör ihop under skrivningen (show-paren-mode t) ;; Syntaxkänslig färgkodning av nyckelord för HTML, LaTeX, C m.m. (global-font-lock-mode t) (setq font-lock-support-mode 'lazy-lock-mode) ;; Automatisk radbrytning av vanlig text (filtyper .txt .html .tex m.m.) (add-hook 'text-mode-hook 'turn-on-auto-fill) ;; Utskrifter skall gå till skrivaren vid namn lp (setq lpr-switches '("-Plp")) (setq ps-lpr-switches '("-Plp")) (setq ps-paper-type 'a4) (setq ps-bottom-margin 72) (setq ps-top-margin 72) (setq ps-font-family 'Courier) (setq ps-font-size '(7 . 10)) ;; Hur utskrift av ickelatinska bokstäver och skrivtecken skall ske ;; (förutsätter att Emacs har kompilerats med Leim samt att paketen ;; ps-print och intlfonts är installerade) ;; ;(setq ps-multibyte-buffer 'type1) ;(setq ps-multibyte-buffer 'ttype) ;(setq ps-multibyte-buffer 'bdf-font-except-latin) ;; Redigering av LaTeX- och TeX-dokument ;; ;; När man trycker på skift-2 får man LaTeX-kod för typografiska citat- ;; tecken » före och « efter citatet i stället för " både före och efter. (setq tex-open-quote "\\frqq{}") (setq tex-close-quote "\\flqq{}") ;; ;;En annan variant på citattecken i LaTeX ;(setq tex-open-quote "\\glqq{}") ;(setq tex-close-quote "\\grqq{}") ;; ;; När man öppnar filnamn.tex startas latex-mode och ej tex-mode (setq tex-default-mode 'latex-mode) ;; ;; Stöd för RefTeX (hjälpmedel för referenser m.m. i LaTeX) (add-hook 'latex-mode-hook 'turn-on-reftex) ;; ;; LaTeX- och TeX-dokument förhandsgranskas med xdvi (setq tex-dvi-view-command "xdvi") ;; ;; Av LaTeX och TeX skapade DVI-filer skrivs ut från TeX-menyn: (setq tex-dvi-print-command "dvips -t a4") ;; ;; Om man väljer TeX alt print i TeX-menyn, skapas en postscriptfil: (setq tex-alt-dvi-print-command "dvips -o -t a4") ;; Redigering och visning av HTML-dokument ;; ;; När man trycker Ctrl-c-v i ett HTML-dokument, skall det visas i... ;; Om man inte väljer något annat, blir det »netscape« ;(setq browse-url-browser-function 'browse-url-w3) ;(setq browse-url-browser-function 'browse-url-lynx-emacs) ;; Skriva och sända epost i Emacs ;; ;; Hur eposteditorn skall bete sig (setq message-signature-before-forwarded-message nil) (setq rmail-mail-new-frame nil) (setq mail-self-blind nil) (setq mail-yank-prefix ">") ;; Se till att katalogen ~/rmail finns, om följande skall användas: ;(setq rmail-file-name "~/rmail/RMAIL") ;; ;; Inställningar för bruk av Mailcrypt till PGP och GPG ;; Detta förutsätter, att Mailcrypt och GPG är installerade ;; ;(load-library "mailcrypt") ;(mc-setversion "gpg") ;(autoload 'mc-install-write-mode "mailcrypt" nil t) ;(autoload 'mc-install-read-mode "mailcrypt" nil t) ;(add-hook 'mail-mode-hook 'mc-install-write-mode) ;(add-hook 'rmail-show-message-hook 'mc-install-read-mode) ;(add-hook 'rmail-summary-mode-hook 'mc-install-read-mode) ;(add-hook 'gnus-summary-mode-hook 'mc-install-read-mode) ;(add-hook 'message-mode-hook 'mc-install-write-mode) ;(add-hook 'news-reply-mode-hook 'mc-install-write-mode) ;; ;; Personliga uppgifter för epost (står lämpligen i personlig ~/.emacs.el) ;(setq user-full-name "Abc Xyz") ;(setq mc-gpg-user-id "rstuv") ;(setq mc-gpg-comment "Public key at ") ;(setq user-mail-address "abc.xyz@defg.hi") ;; Tangenttillordning ;; Funktionstangentraden F1-F12 ;(global-set-key [f12] 'rmail-input) ;(global-set-key [f11] 'gnus-no-server) ;(global-set-key [f9] 'set-language-environment) ;(global-set-key [f8] 'kill-buffer) ;(global-set-key [f7] 'set-buffer-file-coding-system) ;(global-set-key [f6] 'revert-buffer) ;(global-set-key [f5] 'dired) ;(global-set-key [f5] 'find-file) ;(global-set-key [f4] 'find-file-literally) ;(global-set-key [f3] 'switch-to-buffer) ;(global-set-key [f2] 'dired) ;; Nuförtiden kommer man till radens början, när man trycker ;; på Home och till radens slut, när man trycker på End, liksom ;; fallet är i vissa ordbehandlare. Tidigare var det inte så i Emacs, ;; utan man kom till textens början (längst upp) med Home och till ;; textens slut (längst ner) med End. Om man vill ha tillbaka det ;; gamla invanda beteendet i Emacs, väljer man följande: ;(global-set-key [home] 'beginning-of-buffer) ;(global-set-key [end] 'end-of-buffer) ;; ;; Har man valt ovanstående, kommer man ändå till radens början med ;; Ctrl-a och till radens slut med Ctrl-e, men man kan ändå lägga in ;; nedanstående kombinationer med Ctrl+Home och Ctrl+End: ;(global-set-key [C-home] 'beginning-of-line) ;(global-set-key [C-end] 'end-of-line) ;; ;; Ytterligare en möjlighet är att använda Ctrl+Home till att hoppa ett ;; stycke bakåt och Ctrl+End till att hoppa ett stycke framåt: ;(global-set-key [C-home] 'backward-paragraph) ;(global-set-key [C-end] 'forward-paragraph)