diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/xdg.el | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lisp/xdg.el b/lisp/xdg.el index e962cd21a6c..76106f42586 100644 --- a/lisp/xdg.el +++ b/lisp/xdg.el | |||
| @@ -197,8 +197,6 @@ Optional argument GROUP defaults to the string \"Desktop Entry\"." | |||
| 197 | (unless (looking-at xdg-desktop-group-regexp) | 197 | (unless (looking-at xdg-desktop-group-regexp) |
| 198 | (error "Expected group name! Instead saw: %s" | 198 | (error "Expected group name! Instead saw: %s" |
| 199 | (buffer-substring (point) (point-at-eol)))) | 199 | (buffer-substring (point) (point-at-eol)))) |
| 200 | (unless (equal (match-string 1) "Desktop Entry") | ||
| 201 | (error "Wrong first group: %s" (match-string 1))) | ||
| 202 | (when group | 200 | (when group |
| 203 | (while (and (re-search-forward xdg-desktop-group-regexp nil t) | 201 | (while (and (re-search-forward xdg-desktop-group-regexp nil t) |
| 204 | (not (equal (match-string 1) group))))) | 202 | (not (equal (match-string 1) group))))) |