--- a/.emacs-my	Mon Feb 20 13:08:16 2012 +0200
+++ b/.emacs-my	Mon Feb 20 20:59:12 2012 +0200
@@ -434,6 +434,11 @@
       (setq i (+ i 1))))
   )
 
+(when (>= emacs-major-version 23)
+  (define-key global-map "\C-x8g" (lambda nil (interactive) (ucs-insert `,(cdr (assoc-string "HRYVNIA SIGN" (ucs-names) t)))))
+  (define-key global-map "\C-x8e" (lambda nil (interactive) (ucs-insert `,(cdr (assoc-string "EURO SIGN" (ucs-names) t)))))
+  )
+
 ;; generic-define-* before (require 'generic-x) allow load all useful extra modes.
 (setq generic-define-mswindows-modes t)
 (setq generic-define-unix-modes t)