ezri/systemd-mode
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

simpler while test

Browse Source
This commit is contained in:
Mark Oteiza
2017-02-02 21:43:08 -05:00
parent bd94a2cb97
commit 59ce8ad415
1 changed files with 3 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
systemd.el
View File

@@ -150,14 +150,12 @@
"Return the value of the key whose value begins at position START. "Return the value of the key whose value begins at position START.
Lines ending in a backslash are concatenated with the next Lines ending in a backslash are concatenated with the next
according to systemd.unit(5)." according to systemd.unit(5)."
(let ((break "\\\\\n") (let (end)
end)
(save-excursion (save-excursion
(while (progn (goto-char (1- (line-end-position))) (while (= (char-before (line-end-position)) ?\\)
(looking-at break))
(forward-line)) (forward-line))
(setq end (line-end-position)) (setq end (line-end-position))
(replace-regexp-in-string break " " (buffer-substring start end))))) (replace-regexp-in-string "\\\\\n" " " (buffer-substring start end)))))
(defun systemd-doc-find () (defun systemd-doc-find ()
"Find the value of the unit's “Documentation” keys. "Find the value of the unit's “Documentation” keys.