|
@@ -546,8 +546,8 @@ as filename."
|
|
(when (string-match proto fname)
|
|
(when (string-match proto fname)
|
|
(let* ((func (plist-get (cdr prolist) :function))
|
|
(let* ((func (plist-get (cdr prolist) :function))
|
|
(greedy (plist-get (cdr prolist) :greedy))
|
|
(greedy (plist-get (cdr prolist) :greedy))
|
|
- (splitted (split-string fname proto))
|
|
|
|
- (result (if greedy restoffiles (cadr splitted))))
|
|
|
|
|
|
+ (split (split-string fname proto))
|
|
|
|
+ (result (if greedy restoffiles (cadr split))))
|
|
(when (plist-get (cdr prolist) :kill-client)
|
|
(when (plist-get (cdr prolist) :kill-client)
|
|
(message "Greedy org-protocol handler. Killing client.")
|
|
(message "Greedy org-protocol handler. Killing client.")
|
|
(server-edit))
|
|
(server-edit))
|