#+BEGIN_SRC emacs-lisp :tangle yes
- (if (>= emacs-major-version 24)
- (progn
- (require 'engine-mode)
+ (if (>= emacs-major-version 24)
+ (progn
+ (require 'engine-mode)
- (defengine amazon
- "http://www.amazon.de/s/ref=nb_sb_noss?url=search-alias%3Daps&filed-keywords=%s"
- :keybinding "a"
- )
+ (defengine amazon
+ "http://www.amazon.de/s/ref=nb_sb_noss?url=search-alias%3Daps&filed-keywords=%s"
+ :keybinding "a"
+ )
- (defengine bing
- "http://www.bing.com/search?q=%s&qs=bs&form=QBLH"
- :browser 'eww-browse-url
- :keybinding "b"
- )
+ (defengine bing
+ "http://www.bing.com/search?q=%s&qs=bs&form=QBLH"
+ :browser 'eww-browse-url
+ :keybinding "b"
+ )
- (defengine cfengine
- "https://docs.cfengine.com/latest/search.html?q=%s"
- :browser 'eww-browse-url
- :keybinding "c"
- )
+ (defengine cfengine
+ "https://docs.cfengine.com/latest/search.html?q=%s"
+ :browser 'eww-browse-url
+ :keybinding "c"
+ )
- (defengine github
- "http://www.github.com/search?q=%s"
- :browser 'eww-browse-url
- :keybinding "G"
- )
+ (defengine github
+ "http://www.github.com/search?q=%s"
+ :browser 'eww-browse-url
+ :keybinding "G"
+ )
- (defengine google
- "http://www.google.com/?q=%s"
- :keybinding "g"
- )
+ (defengine google
+ "http://www.google.com/?q=%s"
+ :keybinding "g"
+ )
- (defengine leo
- "http://dict.leo.org/ende/index_de.html#/search=%s"
- :keybinding "l"
- )
+ (defengine leo
+ "http://dict.leo.org/ende/index_de.html#/search=%s"
+ :keybinding "l"
+ )
- (defengine google-maps
- "http://maps.google.com/maps?q=%s"
- :keybinding "m"
- )
+ (defengine google-maps
+ "http://maps.google.com/maps?q=%s"
+ :keybinding "m"
+ )
- (defengine wikipedia
- "http://www.wikipedia.org/search-redirect.php?language=en&go=Go&search=%s"
- :browser 'eww-browse-url
- :keybinding "w"
- )
+ (defengine wikipedia
+ "http://www.wikipedia.org/search-redirect.php?language=en&go=Go&search=%s"
+ :browser 'eww-browse-url
+ :keybinding "w"
+ )
- (defengine youtube
- "http://www.youtube.com/results?aq=f&oq=&search_query=%s"
- :keybinding "y"
- )
- (engine-mode 1)
- (engine/set-keymap-prefix (kbd "C-c C-/"))
- )
- )
+ (defengine youtube
+ "http://www.youtube.com/results?aq=f&oq=&search_query=%s"
+ :keybinding "y"
+ )
+ (engine-mode 1)
+ (engine/set-keymap-prefix (kbd "C-c C-/"))
+ )
+ )
#+END_SRC
* expand-region