bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#14483: Problem with loading ~/.emacs file


From: Petr Hracek
Subject: bug#14483: Problem with loading ~/.emacs file
Date: Mon, 27 May 2013 17:06:58 +0200
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:17.0) Gecko/20130402 Thunderbird/17.0.5

Hi folks,

I have a problem as well with loading that file (~/.emacs) stored in my home directory.
when I am trying to open them it finish infinite loop.
BZ(https://bugzilla.redhat.com/show_bug.cgi?id=827898)

Could you please advice me what is wrong?

my ~/.emacs file looks like:
;; Options Menu Settings                  --*- emacs-lisp -*--
;; =====================

(unless (featurep 'xemacs)
  (add-to-list 'load-path "~/.emacs-config/lisp.emacs" t)
  (add-to-list 'load-path "~/.emacs-config/lisp.xemacs" t))

(add-to-list 'load-path "~/.emacs-config/lisp" t)

(defun ensc/new-cxx-file (cxx_unified_name)
  (interactive
   (list (read-string "Please insert an unique macro-name to prevent multiple compilation: " nil 'ensc/include-guard-history)))
;   "sPlease insert an unique macro-name to prevent multiple compilation: ")
;  (c++-mode)
  (insert "/*\t--*- "
          (if (string-match "\\.\\(hh\\|cc\\|hcc\\|icc\\)$" (buffer-file-name)) "c++" "c")
          " -*--\n")

  (require 'gpl)
  (insert " * " gpl-copyright-line "\n" )
  (gpl-insert-notice " *" (gpl-generic-notice))
  (insert " */\n")

  (if (not (string= cxx_unified_name ""))

      (insert "\n"
              "#ifndef " cxx_unified_name "\n"
              "#define " cxx_unified_name "\n")
    (unless (string-match "\\.icc$" (buffer-file-name))
      (insert "\n"
              "#ifdef HAVE_CONFIG_H\n"
              "#  include <config.h>\n"
              "#endif\n")))

  (insert "\n")

  (unless (string= cxx_unified_name "")
    (save-excursion
      (insert "\n\n"
              "#endif\t/* " cxx_unified_name " */\n")))
  )

(message "Finished init.el.")

-- 
Best regards / S pozdravem
Petr Hracek

reply via email to

[Prev in Thread] Current Thread [Next in Thread]