comparison lisp/cedet/cedet-files.el @ 106907:9d769a0fc9cd

Merge from trunk
author Jan D. <jan.h.d@swipnet.se>
date Tue, 19 Jan 2010 11:52:59 +0100
parents b3b9ebd930e1
children 280c8ae2476d 376148b31b5e
comparison
equal deleted inserted replaced
106857:f12233437424 106907:9d769a0fc9cd
67 Optional TESTMODE is used in tests to avoid doing some platform 67 Optional TESTMODE is used in tests to avoid doing some platform
68 specific conversions during tests." 68 specific conversions during tests."
69 (let ((file referencefile)) 69 (let ((file referencefile))
70 ;; Replace the ! with / 70 ;; Replace the ! with /
71 (setq file (subst-char-in-string ?! ?/ file)) 71 (setq file (subst-char-in-string ?! ?/ file))
72 ;; Occurances of // meant there was once a single !. 72 ;; Occurrences of // meant there was once a single !.
73 (setq file (replace-regexp-in-string "//" "!" file)) 73 (setq file (replace-regexp-in-string "//" "!" file))
74 74
75 ;; Handle Windows special cases 75 ;; Handle Windows special cases
76 (when (or (memq system-type '(windows-nt ms-dos)) testmode) 76 (when (or (memq system-type '(windows-nt ms-dos)) testmode)
77 77