diff options
Diffstat (limited to 'lisp/cedet/semantic/db-javascript.el')
| -rw-r--r-- | lisp/cedet/semantic/db-javascript.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/cedet/semantic/db-javascript.el b/lisp/cedet/semantic/db-javascript.el index c58c295cd5c..789614d511a 100644 --- a/lisp/cedet/semantic/db-javascript.el +++ b/lisp/cedet/semantic/db-javascript.el | |||
| @@ -98,7 +98,7 @@ See bottom of this file for instructions on managing this list.") | |||
| 98 | ;; Create the database, and add it to searchable databases for javascript mode. | 98 | ;; Create the database, and add it to searchable databases for javascript mode. |
| 99 | (defvar-mode-local javascript-mode semanticdb-project-system-databases | 99 | (defvar-mode-local javascript-mode semanticdb-project-system-databases |
| 100 | (list | 100 | (list |
| 101 | (semanticdb-project-database-javascript "Javascript")) | 101 | (semanticdb-project-database-javascript)) |
| 102 | "Search javascript for symbols.") | 102 | "Search javascript for symbols.") |
| 103 | 103 | ||
| 104 | ;; NOTE: Be sure to modify this to the best advantage of your | 104 | ;; NOTE: Be sure to modify this to the best advantage of your |
| @@ -115,13 +115,13 @@ the omniscience database.") | |||
| 115 | "For a javascript database, there are no explicit tables. | 115 | "For a javascript database, there are no explicit tables. |
| 116 | Create one of our special tables that can act as an intermediary." | 116 | Create one of our special tables that can act as an intermediary." |
| 117 | ;; NOTE: This method overrides an accessor for the `tables' slot in | 117 | ;; NOTE: This method overrides an accessor for the `tables' slot in |
| 118 | ;; a database. You can either construct your own (like tmp here | 118 | ;; a database. You can either construct your own (like newtable here |
| 119 | ;; or you can manage any number of tables. | 119 | ;; or you can manage any number of tables. |
| 120 | 120 | ||
| 121 | ;; We need to return something since there is always the "master table" | 121 | ;; We need to return something since there is always the "master table" |
| 122 | ;; The table can then answer file name type questions. | 122 | ;; The table can then answer file name type questions. |
| 123 | (when (not (slot-boundp obj 'tables)) | 123 | (when (not (slot-boundp obj 'tables)) |
| 124 | (let ((newtable (semanticdb-table-javascript "tmp"))) | 124 | (let ((newtable (semanticdb-table-javascript))) |
| 125 | (oset obj tables (list newtable)) | 125 | (oset obj tables (list newtable)) |
| 126 | (oset newtable parent-db obj) | 126 | (oset newtable parent-db obj) |
| 127 | (oset newtable tags nil) | 127 | (oset newtable tags nil) |