355 |
(completing-read prompt c-style-alist nil t |
(completing-read prompt c-style-alist nil t |
356 |
(cons c-indentation-style 0) |
(cons c-indentation-style 0) |
357 |
'c-set-style-history)))))) |
'c-set-style-history)))))) |
358 |
|
(or (stringp stylename) |
359 |
|
(error "Argument to c-set-style was not a string")) |
360 |
(c-initialize-builtin-style) |
(c-initialize-builtin-style) |
361 |
(let ((vars (c-get-style-variables stylename nil))) |
(let ((vars (c-get-style-variables stylename nil))) |
362 |
(unless dont-override |
(unless dont-override |