weather

2 files changed, 39 insertions, 15 deletions

diff --git a/attic/elisp/misc.el b/attic/elisp/misc.el
index 36c39d3..8808a5f 100644
--- a/attic/elisp/misc.el
+++ b/attic/elisp/misc.el
@@ -946,21 +946,6 @@
                  'notmuch-tree-no-match-author-face)))
     (propertize auth 'face face)))
 
-;; winttr
-
-(defun jao-weather (&optional wide)
-  (interactive "P")
-  (if (not wide)
-      (message "%s"
-               (jao-shell-string "curl -s"
-                                 "https://wttr.in/?format=%l++%m++%C+%c+%t+%w++%p"))
-    (jao-afio-goto-scratch)
-    (if-let ((b (get-buffer "*wttr*")))
-        (progn (pop-to-buffer b)
-               (term-send-string (get-buffer-process nil) "clear;curl wttr.in\n"))
-      (jao-exec-in-term "curl wttr.in" "*wttr*"))))
-(global-set-key (kbd "<f5>") #'jao-weather)
-
 ;; so-long
 (setq large-file-warning-threshold (* 200 1024 1024))
 
diff --git a/lib/eos/jao-weather.el b/lib/eos/jao-weather.el
new file mode 100644
index 0000000..50dc56a
--- /dev/null
+++ b/lib/eos/jao-weather.el
@@ -0,0 +1,39 @@
+;;; jao-weather.el --- weather utils                 -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2026  jao
+
+;; Author: jao <mail@jao.io>
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+(require 'jao-afio)
+(require 'jao-shell)
+(require 'term)
+
+;;; winttr
+;;;###autoload
+(defun jao-weather (&optional wide)
+  (interactive "P")
+  (if (not wide)
+      (message "%s"
+               (jao-shell-string "curl -s"
+                                 "https://wttr.in/?format=%l++%m++%C+%c+%t+%w++%p"))
+    (jao-afio-goto-scratch)
+    (if-let* ((b (get-buffer "*wttr*")))
+        (progn (pop-to-buffer b)
+               (term-send-string (get-buffer-process nil) "clear;curl wttr.in\n"))
+      (jao-exec-in-term "curl wttr.in" "*wttr*" t))))
+
+(provide 'jao-weather)
+;;; jao-weather.el ends here