Mercurial > emacs
comparison lisp/cedet/srecode/table.el @ 105328:2f2bc20297c6
Doc/message fixes.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Thu, 01 Oct 2009 03:08:03 +0000 |
parents | 41dc39934483 |
children | 7f4c7f5c0eba |
comparison
equal
deleted
inserted
replaced
105327:dcbb3800a4e1 | 105328:2f2bc20297c6 |
---|---|
144 Return nil if there was none." | 144 Return nil if there was none." |
145 (object-assoc file 'file (oref mt tables))) | 145 (object-assoc file 'file (oref mt tables))) |
146 | 146 |
147 (defun srecode-mode-table-new (mode file &rest init) | 147 (defun srecode-mode-table-new (mode file &rest init) |
148 "Create a new template table for MODE in FILE. | 148 "Create a new template table for MODE in FILE. |
149 INIT are the initialization parametrs for the new template table." | 149 INIT are the initialization parameters for the new template table." |
150 (let* ((mt (srecode-make-mode-table mode)) | 150 (let* ((mt (srecode-make-mode-table mode)) |
151 (old (srecode-mode-table-find mt file)) | 151 (old (srecode-mode-table-find mt file)) |
152 (attr (file-attributes file)) | 152 (attr (file-attributes file)) |
153 (new (apply 'srecode-template-table | 153 (new (apply 'srecode-template-table |
154 (file-name-nondirectory file) | 154 (file-name-nondirectory file) |