packages/utils/emacs/files/site-start.el

   1 ;; Emacs startup file for OpenWRT Emacs package
   2 ;;
   3 ;; Copyright (C) 2010 David Kuehling  <dvdkhlng TA gmx TOD de>
   4 ;; License: GPLv2 or later; NO WARRANTY.
   5 ;;
   6
   7 ;; load documentation for internal functions.  This is skipped by loadup.el
   8 ;; when not dumping so we do it here.
   9 (Snarf-documentation "DOC")
  10
  11 ;; On openwrt 'ls' is provided by busybox.  That version of 'ls' does not
  12 ;; support the --dired option, make Emacs work around that.
  13 (setq dired-use-ls-dired nil)
  14
  15 ;; Allow us to output international characters to the terminal
  16 (set-terminal-coding-system 'utf-8)
  17
  18 ;; Do not show the menu bar.  What use is it without a mouse?
  19 ;; (Note that you can still use the menu via <Esc> x menu-bar-open
  20 ;; or tmm-menubar
  21 (menu-bar-mode 0)
  22
  23 ;; ugly work-around for load-history entry (require . t-mouse) added by
  24 ;; linux.el Not good, as it costs some memory.
  25 (setq load-history
  26       (apply 'nconc (mapcar (lambda (v) (if (stringp (car v)) (list v) nil))
  27                             load-history)))