Browse CVS Repository
Diff of /kogiku/kogiku/kogiku.el
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 226 |
(kogiku-file-name-completion string dir t)) |
(kogiku-file-name-completion string dir t)) |
| 227 |
|
|
| 228 |
(defun kogiku-double-dollars (input) |
(defun kogiku-double-dollars (input) |
| 229 |
(replace-regexp-in-string "\\$" "$$" input)) |
(let ((ret "")) |
| 230 |
|
(while (string-match "\\$" input) |
| 231 |
|
(setq ret (concat ret |
| 232 |
|
(substring input 0 (match-beginning 0)) |
| 233 |
|
"$$")) |
| 234 |
|
(setq input (substring input (match-end 0)))) |
| 235 |
|
(concat ret input))) |
| 236 |
|
|
| 237 |
(defun kogiku-read-file-name-internal (string dir action) |
(defun kogiku-read-file-name-internal (string dir action) |
| 238 |
(block nil |
(block nil |
|
|
Legend:
| Removed from v.1.7 |
|
| changed lines |
| |
Added in v.1.8 |
|
|
|