A RetroSearch Logo

Home - News ( United States | United Kingdom | Italy | Germany ) - Football scores

Search Query:

Showing content from https://github.com/jrblevin/markdown-mode/commit/d18a8f856d19dfac8fa6e6e72b2448e262045fcc below:

Fix table insertion to agree with tests · jrblevin/markdown-mode@d18a8f8 · GitHub

File tree Expand file treeCollapse file tree 2 files changed

+11

-20

lines changed

Filter options

Expand file treeCollapse file tree 2 files changed

+11

-20

lines changed Original file line number Diff line number Diff line change

@@ -9358,7 +9358,7 @@ rows and columns and the column alignment."

 9358 9358

(interactive)

 9359 9359

(let* ((rows (or rows (string-to-number (read-string "Row size: "))))

 9360 9360

(columns (or columns (string-to-number (read-string "Column size: "))))

 9361 -

(align (or align (read-string "Alignment ([l]eft, [r]ight, [c]enter): ")))

 9361 +

(align (or align (read-string "Alignment ([l]eft, [r]ight, [c]enter, or RET for default): ")))

 9362 9362

(align (cond ((equal align "l") ":--")

 9363 9363

((equal align "r") "--:")

 9364 9364

((equal align "c") ":-:")

@@ -9367,7 +9367,7 @@ rows and columns and the column alignment."

 9367 9367

(indent (make-string (current-column) ?\ ))

 9368 9368

(line (concat

 9369 9369

(apply 'concat indent "|"

 9370 -

(make-list columns " |")) "\n"))

 9370 +

(make-list columns " |")) "\n"))

 9371 9371

(hline (apply 'concat indent "|"

 9372 9372

(make-list columns (concat align "|")))))

 9373 9373

(if (string-match

@@ -9380,7 +9380,7 @@ rows and columns and the column alignment."

 9380 9380

(if (> rows 1)

 9381 9381

(progn

 9382 9382

(end-of-line 1) (insert (concat "\n" hline)) (goto-char pos)))

 9383 -

(markdown-table-align)))

 9383 +

(markdown-table-forward-cell)))

 9384 9384 9385 9385 9386 9386

;;; ElDoc Support

 Original file line number Diff line number Diff line change

@@ -5475,7 +5475,8 @@ See GH-288."

 5475 5475

|:--|:--|

 5476 5476

| | |

 5477 5477

| | |

 5478 -

"))))

 5478 +

"))

 5479 +

(should (= (point) 3))))

 5479 5480 5480 5481

(ert-deftest test-markdown-insertion/create-table-with-right-align ()

 5481 5482

"Insert table with right column alignment."

@@ -5486,7 +5487,8 @@ See GH-288."

 5486 5487

|--:|--:|

 5487 5488

| | |

 5488 5489

| | |

 5489 -

"))))

 5490 +

"))

 5491 +

(should (= (point) 3))))

 5490 5492 5491 5493

(ert-deftest test-markdown-insertion/create-table-with-center-align ()

 5492 5494

"Insert table with center column alignment."

@@ -5497,7 +5499,8 @@ See GH-288."

 5497 5499

|:-:|:-:|

 5498 5500

| | |

 5499 5501

| | |

 5500 -

"))))

 5502 +

"))

 5503 +

(should (= (point) 3))))

 5501 5504 5502 5505

(ert-deftest test-markdown-insertion/create-table-with-default-align ()

 5503 5506

"Insert table with default column alignment."

@@ -5508,20 +5511,8 @@ See GH-288."

 5508 5511

|---|---|

 5509 5512

| | |

 5510 5513

| | |

 5511 -

"))))

 5512 - 5513 -

;;; Create table with center column alignment

 5514 - 5515 -

(ert-deftest test-markdown-insertion/create-table-with-center-align ()

 5516 -

"Insert table with center align."

 5517 -

(markdown-test-string ""

 5518 -

(execute-kbd-macro (read-kbd-macro "M-x markdown-insert-table RET 2 RET 3 RET c RET"))

 5519 -

(should (string-equal (buffer-string) "| | |

 5520 -

|---|---|

 5521 -

| | |

 5522 -

| | |

 5523 -

"))))

 5524 - 5514 +

"))

 5515 +

(should (= (point) 3))))

 5525 5516 5526 5517

;;; gfm-mode tests:

 5527 5518

You can’t perform that action at this time.

RetroSearch is an open source project built by @garambo | Open a GitHub Issue

Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo

HTML: 3.2 | Encoding: UTF-8 | Version: 0.7.4