diff options
Diffstat (limited to 'lisp/net/quickurl.el')
| -rw-r--r-- | lisp/net/quickurl.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/net/quickurl.el b/lisp/net/quickurl.el index 4045a443640..c3da1707165 100644 --- a/lisp/net/quickurl.el +++ b/lisp/net/quickurl.el | |||
| @@ -511,15 +511,15 @@ TYPE dictates what will be inserted, options are: | |||
| 511 | (with-current-buffer quickurl-list-last-buffer | 511 | (with-current-buffer quickurl-list-last-buffer |
| 512 | (insert | 512 | (insert |
| 513 | (case type | 513 | (case type |
| 514 | ('url (funcall quickurl-format-function url)) | 514 | (url (funcall quickurl-format-function url)) |
| 515 | ('naked-url (quickurl-url-url url)) | 515 | (naked-url (quickurl-url-url url)) |
| 516 | ('with-lookup (format "%s <URL:%s>" | 516 | (with-lookup (format "%s <URL:%s>" |
| 517 | (quickurl-url-keyword url) | 517 | (quickurl-url-keyword url) |
| 518 | (quickurl-url-url url))) | 518 | (quickurl-url-url url))) |
| 519 | ('with-desc (format "%S <URL:%s>" | 519 | (with-desc (format "%S <URL:%s>" |
| 520 | (quickurl-url-description url) | 520 | (quickurl-url-description url) |
| 521 | (quickurl-url-url url))) | 521 | (quickurl-url-url url))) |
| 522 | ('lookup (quickurl-url-keyword url))))) | 522 | (lookup (quickurl-url-keyword url))))) |
| 523 | (error "No URL details on that line")) | 523 | (error "No URL details on that line")) |
| 524 | url)) | 524 | url)) |
| 525 | 525 | ||