Mercurial > emacs
comparison lisp/cedet/semantic/fw.el @ 110534:826d60163924
Merge changes from emacs-23 branch.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Thu, 23 Sep 2010 22:10:54 -0400 |
| parents | a5ad4f188e19 |
| children | 9814473572d4 |
comparison
equal
deleted
inserted
replaced
| 110517:64945cefe6a6 | 110534:826d60163924 |
|---|---|
| 307 (save-match-data | 307 (save-match-data |
| 308 (if (featurep 'xemacs) | 308 (if (featurep 'xemacs) |
| 309 (find-file-noselect file nowarn rawfile) | 309 (find-file-noselect file nowarn rawfile) |
| 310 (find-file-noselect file nowarn rawfile wildcards))) | 310 (find-file-noselect file nowarn rawfile wildcards))) |
| 311 )) | 311 )) |
| 312 | |
| 313 ;;; Database restriction settings | |
| 314 ;; | |
| 315 (defmacro semanticdb-without-unloaded-file-searches (forms) | |
| 316 "Execute FORMS with `unloaded' removed from the current throttle." | |
| 317 `(let ((semanticdb-find-default-throttle | |
| 318 (if (featurep 'semanticdb-find) | |
| 319 (remq 'unloaded semanticdb-find-default-throttle) | |
| 320 nil))) | |
| 321 ,forms)) | |
| 322 (put 'semanticdb-without-unloaded-file-searches 'lisp-indent-function 1) | |
| 312 | 323 |
| 313 | 324 |
| 314 ;; ;;; Editor goodies ;-) | 325 ;; ;;; Editor goodies ;-) |
| 315 ;; ;; | 326 ;; ;; |
| 316 ;; (defconst semantic-fw-font-lock-keywords | 327 ;; (defconst semantic-fw-font-lock-keywords |