Permalink
Browse files

Descriptions now display better: indented and wrapped.

Added TODO flags to items in todo.org.
  • Loading branch information...
Brian Zwahr
Brian Zwahr committed Jul 29, 2012
1 parent a33ca02 commit e401f96b5fc1a6a073a8d314f46a1ffc1e7665d9
Showing with 26 additions and 10 deletions.
  1. +0 −1 emacs/features/emacs.feature
  2. +8 −1 emacs/features/step-definitions/emacs-steps.el
  3. +8 −4 emacs/todo.org
  4. +10 −4 emacs/vimgolf.el
@@ -22,4 +22,3 @@ Feature: VimGolf Browser
Then the cursor should be before "Make "
When I press "p"
Then the cursor should be before "Compl"
-
@@ -13,7 +13,14 @@
"Copy this command for a circuit layout program to create 10 total smd commands. Increment the number in quotes to name each pad, and add 0.7 to each of the (X Y) coordinates at the end of each line.")
("500855e60599d90002000073"
"Convert pandoc unordered list to a numbered list"
- "I know it's possible to use #. in pandoc to auto-generate numbered lists, but then it's not easy to tell how many items there are when reading it in Markdown. How fast can you make the switch?")))
+ "I know it's possible to use #. in pandoc to auto-generate numbered lists, but then it's not easy to tell how many items there are when reading it in Markdown. How fast can you make the switch?")
+ ("4fe62f8a8b2f800001000043"
+ "Cleanining up 80 column concatenated text"
+ "1. Put the whole query on one line, remove the concatenation operators2. Remove the double spaces that appear a few times in the query3. Use string-interpolated variable statementPid rather than the ugly concatenation")
+ ("4d1b4ac3c58eaa2a8a0005c2"
+ "Ruby 1.9 compat"
+ "Remember when Ruby supported `when <expr> :`? Well, it doesn't in 1.9, so let's make sure we use `then`, without ruining our lovely new hash syntax!")
+ ))
(vimgolf-browse)))
(When "^I show the description$"
View
@@ -3,13 +3,17 @@
** Game Excersizes
** Browser
-*** Handle/fix character encoding
+*** TODO Handle/fix character encoding
Things like < and >, etc.
-*** Fix line endings
+*** TODO Fix line endings
Need to convert ^M characters
-*** Add/fix line wrapping
+*** DONE Add/fix line wrapping
+ CLOSED: [2012-07-28 Sat 22:04]
+ :LOGBOOK:
+ - State "DONE" from "TODO" [2012-07-28 Sat 22:04]
+ :END:
Can't assume that everyone's emacs will be set the same. Should really set a
particular fill-column and enforce it.
-*** Truncate long titles
+*** TODO Truncate long titles
Use ellipses to truncate titles that would normally be longer than the
fill-column width.
View
@@ -353,7 +353,11 @@ unknown key sequence was entered).")
(start 0))
(setq *vimgolf-browse-list* nil)
(while (string-match "<a href=\"/challenges/\\([a-zA-Z0-9]+\\)\">\\(.*?\\)</a>.*?<p>\\(.*?\\)</p>" html)
- (add-to-list '*vimgolf-browse-list* (cons (match-string 1 html) (list (match-string 2 html) (match-string 3 html))) t)
+ (add-to-list '*vimgolf-browse-list*
+ (cons (match-string 1 html)
+ (list (url-unhex-string (match-string 2 html))
+ (url-unhex-string (match-string 3 html))))
+ t)
(setq html (substring html (match-end 0))))
*vimgolf-browse-list*)))
@@ -407,12 +411,14 @@ unknown key sequence was entered).")
(let ((start (point)))
(goto-char (next-single-property-change (point) 'challenge-description))
(delete-region start (point))
- (kill-line 2)))
+ (delete-blank-lines)
+ (delete-blank-lines)))
(end-of-line)
- (newline 2)
+ (newline 3)
(forward-line -1)
(let ((start (point)))
- (insert (car (cddr (assoc challenge-id *vimgolf-browse-list*))))
+ (insert " " (car (cddr (assoc challenge-id *vimgolf-browse-list*))))
+ (fill-region start (point))
(add-text-properties start (point) `(challenge-description ,challenge-id))))
(setq buffer-read-only t))))

0 comments on commit e401f96

Please sign in to comment.