From da8e012ab815b098ba08e33e725ac8f6d6da86e9 Mon Sep 17 00:00:00 2001
From: Maximilian Albert <maximilian.albert@gmail.com>
Date: Wed, 5 Mar 2008 18:57:01 +0000
Subject: New menu command to quickly create guides around page

(bzr r4970)
---
 src/sp-guide.cpp | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

(limited to 'src/sp-guide.cpp')

diff --git a/src/sp-guide.cpp b/src/sp-guide.cpp
index 81109c4fb..2f91a17cf 100644
--- a/src/sp-guide.cpp
+++ b/src/sp-guide.cpp
@@ -266,6 +266,25 @@ sp_guide_pt_pairs_to_guides(SPDocument *doc, std::list<std::pair<Geom::Point, Ge
     }
 }
 
+void
+sp_guide_create_guides_around_page(SPDocument *doc) {
+    std::list<std::pair<Geom::Point, Geom::Point> > pts;
+
+    Geom::Point A(0, 0);
+    Geom::Point C(sp_document_width(doc), sp_document_height(doc));
+    Geom::Point B(C[Geom::X], 0);
+    Geom::Point D(0, C[Geom::Y]);
+
+    pts.push_back(std::make_pair<Geom::Point, Geom::Point>(A, B));
+    pts.push_back(std::make_pair<Geom::Point, Geom::Point>(B, C));
+    pts.push_back(std::make_pair<Geom::Point, Geom::Point>(C, D));
+    pts.push_back(std::make_pair<Geom::Point, Geom::Point>(D, A));
+
+    sp_guide_pt_pairs_to_guides(doc, pts);
+
+    sp_document_done (doc, SP_VERB_NONE, _("Guides around page"));
+}
+
 void sp_guide_show(SPGuide *guide, SPCanvasGroup *group, GCallback handler)
 {
     SPCanvasItem *item = sp_guideline_new(group, guide->point_on_line, guide->normal_to_line.to_2geom());
-- 
cgit v1.2.3