[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/autoinsert.el,v
From: |
Lute Kamstra |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/autoinsert.el,v |
Date: |
Wed, 19 Nov 2008 05:50:55 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Lute Kamstra <lute> 08/11/19 05:50:55
Index: autoinsert.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/autoinsert.el,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -b -r1.59 -r1.60
--- autoinsert.el 19 Nov 2008 04:32:05 -0000 1.59
+++ autoinsert.el 19 Nov 2008 05:50:54 -0000 1.60
@@ -93,9 +93,9 @@
(defcustom auto-insert-alist
'((("\\.\\([Hh]\\|hh\\|hpp\\)\\'" . "C / C++ header")
(upcase (concat (file-name-nondirectory
- (substring buffer-file-name 0 (match-beginning 0)))
+ (file-name-sans-extension buffer-file-name))
"_"
- (substring buffer-file-name (1+ (match-beginning 0)))))
+ (file-name-extension buffer-file-name)))
"#ifndef " str \n
"#define " str "\n\n"
_ "\n\n#endif")