Commit Diff


commit - 12a43913465309134eaf08b1815aec008ec84d8a
commit + 61251035ae3c1ee9d25d54bf5ddcdbb3746b4d53
blob - cf101f7ba19b63bad743cfe202de63aa09947bec
blob + f771635b4b7f4874bd933a22b8def62f6558801c
--- ChangeLog
+++ ChangeLog
@@ -1,5 +1,7 @@
 2021-06-26  Omar Polo  <op@omarpolo.com>
 
+	* cmd.c (cmd_inc_fill_column): add inc-fill-column and dec-fill-column
+
 	* configure.ac: tagged 0.3 --- "Spaceman"
 
 2021-06-25  Omar Polo  <op@omarpolo.com>
blob - 5bbf8c9ddf6700771237949489155c5fa892f853
blob + 4d64069ea7d59c6276e1dbe0ff26a8dbbb8c533a
--- cmd.c
+++ cmd.c
@@ -14,8 +14,9 @@
  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  */
 
-#include <string.h>
+#include <limits.h>
 #include <stdlib.h>
+#include <string.h>
 
 #include "telescope.h"
 
@@ -540,6 +541,30 @@ cmd_toggle_help(struct buffer *buffer)
 }
 
 void
+cmd_inc_fill_column(struct buffer *buffer)
+{
+	if (fill_column == INT_MAX)
+		return;
+
+	fill_column += 2;
+	message("fill-column: %d", fill_column);
+
+	ui_schedule_redraw();
+}
+
+void
+cmd_dec_fill_column(struct buffer *buffer)
+{
+	if (fill_column == INT_MAX || fill_column < 8)
+		return;
+
+	fill_column -= 2;
+	message("fill-column: %d", fill_column);
+
+	ui_schedule_redraw();
+}
+
+void
 cmd_olivetti_mode(struct buffer *buffer)
 {
 	olivetti_mode = !olivetti_mode;
blob - 8cceff520e50d166999917d6013a2024501f07f3
blob + 3d74f7ac5de86741073d2bd73b382a3eff8ea6c1
--- cmd.h
+++ cmd.h
@@ -52,6 +52,9 @@ CMD(cmd_load_current_url);
 CMD(cmd_bookmark_page);
 CMD(cmd_list_bookmarks);
 CMD(cmd_toggle_help);
+
+CMD(cmd_inc_fill_column);
+CMD(cmd_dec_fill_column);
 CMD(cmd_olivetti_mode);
 
 CMD(cmd_mini_delete_char);
blob - cfac1ccfba1560946f1cdaa0f54bfc5cea03c037
blob + 0ce589ba83f41bb3a6224e1d03de46677bc3ff22
--- telescope.1
+++ telescope.1
@@ -168,6 +168,10 @@ kill-telescope
 clear-minibuf
 .It M-x
 execute-extended-command
+.It C-c {
+dec-fill-column
+.It C-c }
+inc-fill-column
 .It C-c p
 previous-heading
 .It C-c n
@@ -392,11 +396,15 @@ Focus the previous tab, wrapping around eventually.
 .Bl -tag -width execute-extended-command -compact
 .It Ic clear-minibuf
 Clears the echo area.
+.It Ic dec-fill-column
+Decrements fill-column by two.
 .It Ic execute-extended-command
 Prompts for a command name using the minibuffer.
 .It Ic kill-telescope
 Quit
 .Nm .
+.It Ic inc-fill-column
+Increments fill-column by two.
 .It Ic load-current-url
 Prompts for an URL, the minibuffer is preloaded with the current
 one.
blob - 1f1d656c148c317626ffe3e07596bc10234ff596
blob + 46d061960750dbce899248cdc8dd20e03be194f3
--- ui.c
+++ ui.c
@@ -177,6 +177,9 @@ load_default_keys(void)
 
 	global_set_key("M-x",		cmd_execute_extended_command);
 
+	global_set_key("C-c {",		cmd_dec_fill_column);
+	global_set_key("C-c }",		cmd_inc_fill_column);
+
 	global_set_key("C-c p",		cmd_previous_heading);
 	global_set_key("C-c n",		cmd_next_heading);