Commit 53b28c22 authored by Joel Rosdahl's avatar Joel Rosdahl
Browse files

Use name of current user as default in kom-change-parenthesis.

parent 8d185d16
......@@ -1762,7 +1762,12 @@ converted so that the search is case insensitive."
(let ((conf-stat (lyskom-read-conf-stat
(lyskom-get-string 'name-to-be-changed)
'(all) nil nil t)))
(conf-stat->name (blocking-do 'get-conf-stat lyskom-pers-no))
(if (null conf-stat)
(lyskom-insert-string 'no-such-conf-or-pers)
(if (string-match "^\\(.*\\)(\\(.*\\))\\(.*\\)$" (conf-stat->name conf-stat))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment