equal
deleted
inserted
replaced
62 (defvar gadict-indent-offset 2 |
62 (defvar gadict-indent-offset 2 |
63 "Indent level.") |
63 "Indent level.") |
64 |
64 |
65 (defun gadict-indent-line () |
65 (defun gadict-indent-line () |
66 "Indent line in gdict mode." |
66 "Indent line in gdict mode." |
67 (let ( (indent ) ) |
67 (if (eq (current-indentation) gadict-indent-offset) |
68 (if (eq (current-indentation) gadict-indent-offset) |
|
69 (indent-line-to 0) |
68 (indent-line-to 0) |
70 (indent-line-to gadict-indent-offset)))) |
69 (indent-line-to gadict-indent-offset))) |
71 |
70 |
72 (defun gadict-setup-indent () |
71 (defun gadict-setup-indent () |
73 "Setup indenting for gdict mode." |
72 "Setup indenting for gdict mode." |
74 (set (make-local-variable 'indent-line-function) 'gadict-indent-line)) |
73 (set (make-local-variable 'indent-line-function) 'gadict-indent-line)) |
75 |
74 |