@@ -149,6 +149,7 @@ VALUE should be the referer."
149
149
(leetcode--maybe-csrf-token))
150
150
151
151
(defun leetcode--credentials ()
152
+ " Receive user account and password."
152
153
(let ((auth-source-creation-prompts
153
154
'((user . " LeetCode user: " )
154
155
(secret . " LeetCode password for %u: " )))
@@ -166,6 +167,7 @@ VALUE should be the referer."
166
167
(plist-get found :save-function )))))
167
168
168
169
(defun leetcode--multipart-form-data (name value )
170
+ " Generate multipart form data with NAME and VALUE."
169
171
`(" file"
170
172
(" name" . , name )
171
173
(" filedata" . , value )
@@ -428,8 +430,8 @@ Return a list of rows, each row is a vector:
428
430
429
431
;;;### autoload
430
432
(defun leetcode ()
431
- " A wrapper for leetcode--async, because emacs-aio can not be
432
- autoloaded. see: https://github.com/skeeto/emacs-aio/issues/3"
433
+ " A wrapper for ` leetcode--async' , because emacs-aio can not be autoloaded.
434
+ see: https://github.com/skeeto/emacs-aio/issues/3. "
433
435
(interactive )
434
436
(leetcode--async))
435
437
@@ -680,7 +682,7 @@ following possible value:
680
682
(leetcode--loading-mode -1 ))))))
681
683
682
684
(defun leetcode--problem-link (title )
683
- " Generate problem link from title ."
685
+ " Generate problem link from TITLE ."
684
686
(concat leetcode--base-url " /problems/" (leetcode--slugify-title title)))
685
687
686
688
(aio-defun leetcode-show-current-problem ()
@@ -730,12 +732,12 @@ Get current entry by using `tabulated-list-get-entry' and use
730
732
(switch-to-buffer (current-buffer ))))))
731
733
732
734
(defun leetcode--kill-buff-and-delete-window (buf )
733
- " Kill buff and delete its window"
735
+ " Kill BUF and delete its window. "
734
736
(delete-windows-on buf t )
735
737
(kill-buffer buf))
736
738
737
739
(defun leetcode-quit ()
738
- " Close and delete leetcode related buffers and windows"
740
+ " Close and delete leetcode related buffers and windows. "
739
741
(interactive )
740
742
(leetcode--kill-buff-and-delete-window (get-buffer leetcode--buffer-name))
741
743
(leetcode--kill-buff-and-delete-window (get-buffer leetcode--description-buffer-name))
@@ -754,8 +756,8 @@ python3, ruby, rust, scala, swift.")
754
756
mysql, mssql, oraclesql." )
755
757
756
758
(defvar leetcode--lang leetcode-prefer-language
757
- " LeetCode programming language or sql for current problem
758
- internally. Default is programming language." )
759
+ " LeetCode programming language or sql for current problem internally.
760
+ Default is programming language." )
759
761
760
762
(defconst leetcode--lang-suffixes
761
763
'((" c" . " .c" ) (" cpp" . " .cpp" ) (" csharp" . " .cs" )
@@ -769,7 +771,7 @@ c, cpp, csharp, golang, java, javascript, kotlin, php, python,
769
771
python3, ruby, rust, scala, swift, mysql, mssql, oraclesql." )
770
772
771
773
(defun leetcode--set-lang (snippets )
772
- " Set `leetcode--lang' based on langSlug in snippets ."
774
+ " Set `leetcode--lang' based on langSlug in SNIPPETS ."
773
775
(setq leetcode--lang
774
776
(if (seq-find (lambda (s )
775
777
(equal (alist-get 'langSlug s)
@@ -868,6 +870,7 @@ for current problem."
868
870
869
871
(define-minor-mode leetcode--loading-mode
870
872
" Minor mode to showing leetcode loading status."
873
+ :require 'leetcode
871
874
:lighter leetcode--loading-lighter
872
875
:group 'leetcode
873
876
:global t
0 commit comments