diff options
| author | Quentin Aristote <quentin@aristote.fr> | 2021-11-20 16:22:53 +0100 |
|---|---|---|
| committer | Quentin Aristote <quentin@aristote.fr> | 2021-11-20 16:22:53 +0100 |
| commit | a5ac2f51962ea78a63ff981438f212d646999b92 (patch) | |
| tree | ee6f9a9bad1f4486af3e71c79d2d7e770312eae7 | |
| parent | 9eab7882252b0d92373b9834294e04418c93e820 (diff) | |
remove debug messages in clean-quote
| -rw-r--r-- | local/bibli-paris/bibli-paris.el | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/local/bibli-paris/bibli-paris.el b/local/bibli-paris/bibli-paris.el index 1a4d2e5..2f33e53 100644 --- a/local/bibli-paris/bibli-paris.el +++ b/local/bibli-paris/bibli-paris.el @@ -180,15 +180,12 @@ date if borrowed and set to the maximum unix date if unavailable." (let ((blank "[[:blank:]\r\n]+") (result entry-quote)) (setq result (replace-regexp-in-string blank " " result)) - (message result) (setq result (string-trim result blank blank)) - (message result) (setq result (replace-regexp-in-string "BD EN RESERVE" "EN RESERVE BD" result t t)) - (message result) (setq result (replace-regexp-in-string "\\([^0-9/]\\)\\([0-9]\\)\\($\\|\/\\)" "\\10\\2\\3" |