Move general getting into one place.
--- a/.emacs-my Sun Mar 14 20:07:46 2010 +0200
+++ b/.emacs-my Sun Mar 14 20:12:11 2010 +0200
@@ -93,6 +93,22 @@
;; ======================================================================
;; standart/general settings.
+(if (boundp 'confirm-kill-emacs)
+ (setq confirm-kill-emacs 'yes-or-no-p))
+
+;; Try to speed things up, especially in VM.
+(setq gc-cons-threshold 2000000)
+
+;; Don't beep in my headphones!
+(setq ring-bell-function '(lambda () "Empty ring-bell-function." nil))
+(setq visible-bell t) ; With default ring-bell-function in text terminal
+ ; revert screen if press [end] or [home]
+
+;; Prompt before evaluating local bits of lisp. This stops people
+;; putting things at the end of files which delete all your files!
+(setq enable-local-variables t
+ enable-local-eval 1)
+
(setq kill-whole-line t)
;; show column & line numbers in status bar
@@ -312,33 +328,6 @@
;; (set-language-environment "Russian") ; XXX not used as set default coding system to koi8-r.
-;; ======================================================================
-;;
-;; NON-STANDARD VARIABLES
-
-;; ======================================================================
-;;
-;; STANDARD VARIABLES
-
-(if (boundp 'confirm-kill-emacs)
- (setq confirm-kill-emacs 'yes-or-no-p))
-
-;; Try to speed things up, especially in VM.
-(setq gc-cons-threshold 2000000)
-
-;; Don't beep in my headphones!
-(setq ring-bell-function '(lambda () "Empty ring-bell-function." nil))
-(setq visible-bell t) ; With default ring-bell-function in text terminal
- ; revert screen if press [end] or [home]
-
-;; Prompt before evaluating local bits of lisp. This stops people
-;; putting things at the end of files which delete all your files!
-(setq enable-local-variables t
- enable-local-eval 1)
-
-;; ======================================================================
-;; STANDARD LIBRARIES
-
;; ----------------------------------------------------------------------
;; dired.